Turbo Pascal (TP71)
Turbo Pascal Nih saya kasih contoh program “Turbo Pascal” a. Program penjumlahan 2 bilangan program penjumlahan2bilangan; uses crt; var J1,B2,B1:real; begin clrscr; write('B1=');readln(B1); write('B2=');readln(B2); J1:=B1+B2; writeln('jumlah',J1:10:0,''); readkey; end. b. Program mengitung keliling lingkaran program menghitung_keliling_lingkaran; uses crt; var keliling,r:real; begin clrscr; write('r=');readln(r); keliling:=2*22/7*r; writeln('jumlah',keliling:10:0,''); readkey; end.

Komentar ini telah dihapus oleh pengarang.
BalasHapuswaktu ak nyanyi di loby hotel ak ingat lagu ini.ada seorang bule mencium lembut tanganki
BalasHapusHem...
HapusLagu ini, waktu SMU dl jadi materi pelajaran listening ,sayang gurunya sdh meninggal dunia ...we always luv u sir...
BalasHapus