Setiap aplikasi / software pemprograman, kita dapat membuat sebuah kalkulator sederhana atau sains kalkulator, misalnya di Visual Basic, atau lainnya. Bagaimana dengan Pascal ?

berikut source code perhitungan aritmatik sederhana :

ARITMATIK  CALCULATION ( By: Ic@L )

uses crt;

var

x,y,a,b,c,d,e,f:integer;

g:real;

begin

clrscr;

writeln(‘Loading … ‘);

delay(3000);

writeln(‘CalKulator Version 1.0′);

delay(1000);

writeln(‘Masukan Angka Pertama’);

readln(x);

writeln(‘Masukan Angka Kedua’);

readln(y);

a:=x+y;

b:=x-y;

c:=x*y;

g:=x/y;

d:=x div y;

e:=x mod y;

//f:=x ^ y;

writeln(‘Hasil Penjumlahan ‘, a);

writeln(‘Hasil Pengurangan ‘, b);

writeln(‘Hasil Perkalian ‘, c);

writeln(‘Hasil Pembagian / ‘, g);

writeln(‘Hasil DIV ‘, d);

writeln(‘Sisa Pembagian ‘, e);

readkey;

end.

Demikian Terima Kasih ….

Semoga Bermanfaat.