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