Program Aritmatika Sederhana (PASCAL)

Nih dasar banget nih, buat yang baru belajar pascal. Nih program sederhana perkalian, pembagian, pengurangan, dan penjumlahan 2 buah angka. 


Program Aritmatika;

uses crt;

var
a,b : integer;
c : real;

begin
Writeln('PROGRAM ARITMATIKA');
Writeln('==================');

Write('Masukkan nilai a : '); readln(a);
Write('Masukkan nilai b : '); readln(b);
Writeln('==================');


Writeln('Perkalian');
c := a*b;
Writeln ('Hasil Perkalian ', a ,' dan ', b ,' adalah :', c:2:2);


Writeln('Pembagian');
c := a/b;
Writeln ('Hasil Pembagian ', a ,' dan ', b ,' adalah :',c:2:2);

Writeln('Penjumlahan');
c := a+b;
writeln ('Hasil Penjumlahan ', a ,' dan ', b ,' adalah :',c:2:2);

Writeln('Pengurangan');
c := a-b;
Writeln ('Hasil Pengurangan ', a ,' dan ', b ,' adalah :',c:2:2);

readln;
end.