UYGULAMA 2 - 08 Ekim 2009

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.