| Cevap: Bir pascal sorusu yardım..
1.soru ve 2.soru için biraz araştırırsanız birçok sitede benzeri örnek bulabilirsiniz.
Bulduğunuz örneği betimleyecek olursak;
uses crt;
var
para_miktari,dolar_kur,sonuc:real; (burada, aşağıda kullanılacak değişkenler tanımlanmış)
Begin(Başla)
clrscr;(Her işlemde ekranı temizleme)
write('DOLAR KURUNU GiRiNiZ = ');readln(dolar_kur); (dolar_kur değişkeni adıyla atanacak dolar kurunu girmenizi ister)
write('DOLAR MiKTARINI GiRiNiZ= ');readln(para_miktari); (para_miktari değişkeni adıyla atanacak dolar miktarını girmenizi ister)
sonuc:=para_miktari/dolar_kur; (girdiğiniz para miktarını dolar kuruna bölerek sonuç değişkenine atar)
Writeln('elinizdeki dolar miktarinin ytl olarak karsiligi= ',sonuc); (sonuc değişkenine atanan hesaplamayı ekrana yazar)
Readln;
End.
Umarım yardımcı olabilmişimdir.
|