Var
umur : byte;
nama : string;
Untuk memberikan suatu nilai pada variabel, pada statement masukan perintah:
Contoh program
Var
umur : byte;
sekolah : string;
begin
umur := 20;
sekolah := ‘STMIK';
writeln('Umurku ',umur,' tahun');
writeln('Aku bersekolah di ',sekolah);
end.
Input dari User
Var
umur : byte;
sekolah : string;
begin
write('Umur saya berapa? '); readln(umur);
write('Sekolah saya di mana?'); readln(sekolah);
writeln('Umurku ',umur,' tahun');
writeln('Aku bersekolah di ',sekolah');
readln;
end.
Uses Crt
Beberapa perintah atau syntax yang memakai library ini adalah:
1.Clrscr : untuk membersihkan layar.
2.Textcolor : memberi warna pada tulisan.
3.TextBackground : memberi warna pada latar belakang tulisan tersebut.
4.GotoXY : memindahkan kursor ke posisi X,Y.
5.Sound, NoSound : membunyikan speaker dan menghentikannya.
6.Delay : menunda pemrosesan program beberapa waktu.
7.Textmode : mengubah besar karakter.
Tidak ada komentar:
Posting Komentar