Syntax Turbo Pascal
Kali ini saya akanposting, tentang membuat kalkulator
sederhana menggunakan bahasa pemrograman turbo pascal, turbo pascal adalah
bahasa pemrograman yang di ciptakan oleh Borland pascal.
di bawah ini dalah syntax kalkulator sederhana.
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.
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.
Keterangan :
Kenapa tidak ada judul,karena
didalam turbo pascal judul itu tidak
mempengaruhi terhadap syntax,maka dari itu ada atau tidak adanya judul itu
tidak bermasalah.
uses wincrt; ini gunakan untuk menggunakan unit system windows
Var : integer,ini menuntukan bahwa variable tersebut benbentuk
angka.
Var : Char, ini menunjukan bahwa variable tersebut berbentuk
karatkter,Contoh kali,kurang,bagi dan lain-lain
Begin, ini menandakan sudah di mulainya syntax/ isi dari
aplikasi /perintah
Writeln, yaitu perintah untuk
memasukan data,dan biasanya kalau ada perintah writeln harus ada perintah
readln,karena berpasangan,tidak dapat di pisahkan.
Di dalam turbo pascal memasukan
data harus menggunakan (` dan `) dan di akhiri ; agar tidak terjadi error saat
membaca perintah.
If dalam turbo pascal berarti jika,
if ini harus berpasangan dengan then agar tidak terjadi error.
Biasanya perintah terakhir untuk
menghentikan perintah yaitu end;
Tidak ada komentar:
Posting Komentar