buka program turbo pascal 7
1. ketik uses crt;
2. ketik var a,b,c : integer; ( ini mengenalkan variable, dan datanya itu bertype integer).
3. lalu ketik,
begin ( bagian pernyataan).
clrscr; ( fungsinya untuk menghapus).
write(‘a:’); ( untuk menampilkan huruf a:).
readln(a); ( untuk menginput, lalu menampilkan data integer yang di masukan).
write(‘b:’); ( untuk menampilkan huruf b:).
readln(b); ( untuk menginput, lalu menampilkan data integer yang di masukan).
c: = a+b; ( c adalah hasil nilai penjumlahan dari a + b).
writeln (‘c:’,c); ( menampilkan c:).
readln; ( menampilkan hasil c:).
end. ( mengakhiri ).
Tidak ada komentar:
Posting Komentar