Klavyeden girilen iki tam sayı değerinin :
(a) Toplamının;
(b) Çarpımının ekrana yazdırılması...
---------------------------------------------------------------------------------
PROGRAM TOPLAM;
VAR n1, n2, toplam, carpim: INTEGER;
BEGIN
WRITE('Bir sayı giriniz: ');
READLN(n1);
WRITE('Başka bir sayı giriniz: ');
READLN(n2);
toplam := n1 + n2;
carpim := n1 * n2;
WRITELN('Sayıların Toplamı = ', toplam: 8);
WRITELN('Sayıların Çarpımı = ', carpim: 8);
WRITELN('Bir tuşa basınız...');
READLN;
END.
Kaydol:
Kayıt Yorumları (Atom)
Hiç yorum yok:
Yorum Gönder