78 / 100
Untuk kali ini mari kita bahas cara membuat kalkulator sederhana dengan pemrograman turbo pascal, Membuat Kalkulator Sederhana dengan Turbo PASCAL
Membuat Kalkulator sederhana dengan Turbo Pascal
Membuat Kalkulator sederhana dengan Turbo Pascal
Membuat Kalkulator Sederhana dengan Turbo PASCAL
Berikut adalah cara bagaimana membuat program kalkulator sederhana, langsung saja berikut langkah-langkahnya :
Siapkan program turbo pascal, dan pastikan prorgam tersebut sudah terinstal !!!
jika belum silahkan download di link2 berikut :
link 1 : turbo pascal for win 7 & 8
link 2 : turbo pascal for win 7 & 8
jika sudah masukkan coding program berikut :

Kode program
uses crt;
var
a,c,d : integer;
operator, z:char;
begin
repeat
clrscr;
Writeln(‘PETUNJUK:’);
Writeln(‘1. Masukkan angka pertama’);
Writeln(‘2. Masukkan operator (+, -, /, *)’);
Writeln(‘3. Masukkan Angka kedua’);
Writeln (‘——————————-‘);
Writeln(‘PERHITUNGAN: ‘);
Writeln (‘——————————‘);
Write(‘Masukkan angka: ‘); readln(a);
write(‘Operator: ‘); readln(Operator);
write(‘Angka ke dua: ‘); readln(c);
case operator of
‘+’: d:=a + c;
‘-‘: d:=a – c;
‘/’: d:=a div c;
‘*’: d:=a * c;
end;
writeln(‘Hasil: ‘,d);
writeln;
writeln (‘Oleh: M. Fadli’);
writeln;
Write(‘Hitung lagi? (y/n) ‘); readln(z);
until Upcase(z) <> ‘Y’;
 end.

Leave a Reply

Your email address will not be published. Required fields are marked *

fifteen − 14 =