Sabtu, 18 Desember 2010

program pascal aritmatika

Masukan bilangan 1, setelah itu masukan bilangan 2, kemudian lakukan proses penjumlahan, perkalian pengurangan, dan pembagian. Hasil dari ke empat operasi aritmatika tersebut ditampilkan
Layout :
Bilangan 1       : 6
Bilangan 2       : 3
Hasil Penjumlahan      : 9
Hasil Pengurangan      : 3
Hasil Perkalian            : 18
Hasil Pembagian         : 2
Jawab:
uses crt;
var A,B:integer;
begin
    clrscr;
    Write('Bilangan 1: ');Readln(A);
    Write('Bilangan 2: ');Readln(B);
    Writeln('Hasil Penjumlahan= ',A+B);
    Writeln('Hasil Pengurangan= ',A-B);
    Writeln('Hasil Perkalian  = ',A*B);
    Writeln('Hasil Pembagian  = ',A/B:0:0);
    Readln;
end.

Tidak ada komentar:

Posting Komentar