Penjumlahan , perkalian dan pembagian ( Pascal )

Penjumlahan , perkalian dan pembagian ( Pascal )

program jumkalbag;
var
 a,b,c,d : integer;
        e : real;

begin
Write('masukan bilangan pertama = ');
read(a);
Write('Masukan bilangan kedua = ');
read(b);
c:=a+b;
d := a* b;
e:=a/b;
Writeln('Hasil penjumlahan = ',c);
Writeln('Hasil perkalian = ',d);
Writeln('Hasil bagi = ',e:7:3);
end.

0 komentar: