Kondisi if then di Pascal

     Pada praktikum kali ini kita akan membahas tentang program kondisi if then dengan menggunakan ‘and’ pada Bahasa pemrograman pascal.

1. Pertama buka dulu pascalnyaa

2. Lalu ketikkan seperti ini

3. Lalu untuk penggunaan dari uses crt itu sepaket dengan clrscr yang gunanya untuk menghapus outputan dari program sebelumnya yang telah di running, uses crt itu merupakan unit untuk memanggil clrscr nya, jika kita tidak menggunakan uses crt dan clrscr maka akan jadi terlihat banyak dan kurang enak dilihat.

4. Untuk ‘var uts,uas:integer’ itu mendeklarasikan uas da uts nya sebagai bilangan integer atau bilangan bulat, ‘total:real’ mendeklarasikan total nya itu sebagai bilangan real atau decimal.

5. Lalu begin untuk memulai statemen-statement nya, lalu untuk memisahkan statementnya digunakan tanda ;

6. Kemudian  kita berarti akan memunculkan sebuah kalimat ‘masukan nilai uts’ dan ‘masukan nilai uas’ Karena kita diminta agar dapat memasukan angka/inputannya pada kalimat tersebut maka diketiklah ‘readln(uts)’ dan ‘readln(uas)’.

7. Lalu  totalnya menggunakan := Karena merupakan penanda khusus agar dapat dijumlahkan hasilnya.

8. Untuk   program and apabila statement 1 dan 2 nya true, maka akan valid, namun bila salah satu programnya false, maka akan invalid. Untuk pengertian dari yang diatas, jika total nya lebih dari atau sama dengan 80 dan total kurang dari 100 maka tulis total nilai anda, nah sehabis itu kan ada kalimat ‘total:0:0’ maksudnya 0 yang pertama itu memberi jarak sehabis ‘total nilai anda:’ dan untuk 0 yang kedua memberikan angka dibelakang komanya 0, jika kita ketik 2 maka angka yang aka nada dibelakang koma tersebut 2, begitu seterusnya, jika kita sudah memasuki kondisi terakhir jangan lupa berikan tanda ‘;’ pada statement terakhir.

9. Lalu readln; untuk mengeluarkan hasil dari program yang tealah kita buat.

10. End. Untuk mengakhiri program tersebut.