Thursday, 16 October 2014

Program Turbo Pascal

1. klik TPW pada layar monitor
2. klik file kemudian pilih new
 #Program selamat datang
  

Program welcome;
uses Win Crt;
        Begin:
              Writeln ('Selamat Datang di Smk Al-Mubaarok Rembang');;
              Writeln ('jalan Blora Km.04 Rembang');
End.

3. Setelah menulis script diatas lalu pilih menu Run(windows+R)
4. Klik save(ctrl+S) di local disk D/nama folder/nama file"Welcome -pas"
5. Klik file new, ketikkan
  #Program Belajar


Program belajar;
Uses Win Crt;
       Begin:
                Writeln ('saya sedang belajar PASCAL');
                Writeln ('di Smk Al-Mubaarok Rembang');
End.

6. coba Run
7. save di local disk D/folder/nama file"Belajar pass"
8. program constanta

Program Constanta;
Uses Win Crt;
       Const a=69
                 b='indonesia MERDEKA'
Begin
        Writeln ('a;tahun')
        Writeln (b)
End.

9. Run program



*catatan: setelah menulis program lakukan run, jika terdapat kesalahan maka akan berwarna merah