Rabu, 10 November 2010

10. MASUKAN BILANGAN 1 SETELAH ITU MASUKAN BILANGAN 2, KEMUDIAN LAKUKAN PROSES PENJUMLAHAN, PERKALIAN, PENGURANGAN, DAN PEMBAGIAN.

JAWAB:
uses crt;
var b1, b2: longint;
begin
clrscr;
write('Bilangan 1: '); read(b1);
write('Bilangan 2: ');readln(b2);
writeln('Hasil penjumlahan: ', b1+b2);
writeln('Hasil pengurangan: ', b1-b2);
writeln('Hasil perkalian : ', b1*b2);
writeln('Hasil pembagian : ', b1/b2 :2:1);
readln;
end.

Tidak ada komentar:

Posting Komentar