Program Penghitungan Dasar dengan Pascal

program tes2;
uses crt;
var a,b:real;
    c,d,e,f:integer;
begin
clrscr;

begin
write('Bilangan pertama = ');
readln(a);
end;

begin
write('Bilangan kedua = ');
readln(b);
end;

begin
writeln('Penjumlahan = ',a+b);

writeln('Pengurangan = ',a-b);

writeln('Perkalian = ',a*b);

writeln('Pembagian = ',a/b);

readln;
end;

end.

Tweet

Jangan sampai ketinggalan postingan-postingan terbaik dari Gadget Mainstream. Berlangganan melalui email sekarang juga:

Atau sobat juga bisa follow Gadget Mainstream dengan mengklik tombol di bawah ini:

Artikel keren lainnya:

Ditulis oleh Gadget Mainstream pada tanggal Senin, 05 Januari 2015