Cara membuat kalkulator sederhana menggunakan turbo pascal

contoh program kalkulator dengan pascal.
codingnya:

program kalkulator;
uses wincrt;
var
   a,b,c:integer;
   m:char;
begin
     writeln ('masukka angka pertama:');readln(a);
     writeln ('pilih operator: (+),(-),(*),(/)');readln (m);
     writeln ('masukkan angka kedua:');readln(b);
     if m='+' then
     begin
          writeln ('hasilnya:');
 writeln (a+b);
          writeln (c);
     end;
     if m='-' then
     begin
          writeln ('hasilnya:');
 writeln (a-b);
          writeln (c);
     end;
     if m='*' then
     begin
          writeln ('hasilnya:');
 writeln (a*b);
          writeln (c);
     end;
     if m='/' then
     begin
          writeln ('hasilnya:');
 writeln (a div b);
          writeln (c);
     end;
end.

 


download file pas dan Exe program kalkulator sederhana klik disini.

bagi anda yang belum punya turbo pascalnya silahkan download disini.