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: