contoh kalkulator sederhana menggunakan pascal

program kalkulator;
uses crt;
var
input1, input2, tambah, kurang, kali : integer;
bagi : real;

begin
clrscr;

writeln('Program Kalkulator Sederhana');
writeln('Oleh : Faiq Hisyam Marwan');
writeln(' ');
writeln(' ');

write('Masukkan Bilangan Pertama : ');
readln(input1);
write('Masukkan Bilangan Kedua : ');
readln(input2);
writeln(' ');
writeln(' ');

tambah:=input1+input2;
writeln('Hasil Penjumlahannya Adalah : ',tambah);

kurang:=input1-input2;
writeln('Hasil Pengurangannya Adalah : ',kurang);

kali:=input1*input2;
writeln('Hasil Perkaliannya Adalah : ',kali);

bagi:=input1/input2;
writeln('Hasil Pembagiannya Adalah : 'bagi);

readln;
end.