pascaldan anlayanlar yardım:)

[ulugbey]

arkadaslar bugun basladım pascal ögrenmeye

ilk denedigim program calısıyor. ama sonuc asagıdaki resimdeki gibi cıkıyor.

http://img258.imageshack.us/my.php?image=adsz3bp.png

ben sonucun

72.0 şeklinde yazmasını istiyorum.

ne yapmalıyım acaba.


kodlarıda bunlar.
-------------------------------------------------
uses crt;
var
vize:real;
final:real;
notu:real;
begin
write ( 'vize degerini giriniz ');
readln(vize);
write ('final degerini giriniz ');
readln(final);
notu:=vize*4+final*6;
writeln ('sonuc', notu);
readln;
End.
-----------------------------------------

 

[ozgur6009]

sayı tipleri tanımladıktan sonra sonuç tipini E+01 yazması 10 ile sonuç çarpılacak anlamındadır senin yapman gerekli şey sayı tipini tanımlarken tekrar dan sayı tiplerine bakmak olacaktır ben pascalı 5 yıl önce almıştım şu an sayı tipleri hakkında pek bir şey hatırlamıyorum fakat sayı tiplerine tekrar bak 72.0 şeklinde yazmak için virgül ve E+01 tabanını araştır o zaman dediğin gibi olur.

 

[MadNefret]

uses crt;
var
vize:real;
final:real;
notu:real;
begin
write ( 'vize degerini giriniz ');
readln(vize);
write ('final degerini giriniz ');
readln(final);
notu:=vize*4+final*6;
writeln ('sonuc', notu:2:1);
readln;
End.

buyur.....

 

[imparator001]

kardeş bölme işlemi yapmadığına göre real tanımlamana gerek yok
integer taımlarsan daha mantıklı olur
ve küsürat göstermez.
madnefret kardeşimin yazdığı da doğru.
real tipinde format kullanabilirsin.
kolay gelsin..

 

[YoqNick]

dostum ben sana pascaL kitabini wereyim ehehe

 

[hackerman9]

DOSTUM ALSANA EN DOĞRUSU


uses crt;
var
vize:real;
final:real;
notu:real;
begin
write ( 'vize degerini giriniz ');
readln(vize);
write ('final degerini giriniz ');
readln(final);
notu:=vize*4+final*6;
writeln ('sonuc', notu:0:1);
readln;
End.

dene olmazsa ben bu işi bırakırım

 

[MaΨèŔcİķ]

neden hala pascal qbasic bilmem ne ile uğraşılırki şu eğitimde


temelse ver c++ yi gitsin

 

[CHI€F]

neden hala pascal qbasic bilmem ne ile uğraşılırki şu eğitimde


temelse ver c++ yi gitsin

bi anlasam ama hiç olmazsa delphi ye faydası oluo