Program Fungsi pascal

. Listing program uses crt; function pengurangan(a,b:integer):integer; begin clrscr; pengurangan:=a-b; end; var d,e:integer; begin clrscr; write('angka 1=');readln(d); write('angka 2=');readln(e); write('hasilnya=',pengurangan(d,e)); end. LOGIKA PEMROGRAMAN ‘Uses Crt’ merupakan salah satu unit di pascal. Unit yang satu ini harus digunakan jika ingin menggunakan perintah ‘clrscr’ (perintah untuk membersihkan layar ‘Var’ merupakan bagian pendeklarasian variabel yang di dalamnya memuat tipe-tipe data, seperti string, integer, byte, word, char, dll. Mengenai tipe-tipe data akan dibahas di artikel selanjutnya. Setiap listing program utama harus diawali dengan huruf ‘begin’ dan diakhiri dengan ‘end.’ (ingat! jangan lupa titik(.) nya pada end.) Perintah untuk mencetak adalah ‘write’. Jadi kalau mau mencetak “Halo, saya pascal” ‘read/readln’ perintah ini digunakan untuk memasukkan (input) data dalam keyboard ke dalam suatu variabel. Tapi selain write, ada juga perintah ‘writeln’. Bedanya kalau ‘write’ setelah mencetak kursornya tetap disamping, sedangkan kalau ‘writeln’ kursornya ke bawah. Untuk contohnya dapat dicermati dari listing program tadi. Perintah ‘read’ dan ‘readln’ digunakan untuk membaca input yang dimasukkan user. Perbedaan antara keduanya sama dengan ‘write’ dan ‘writeln’. Begin yaitu tanda awal memulai nya program yang akan kita jalankan. for(a=1;a<=b;a++) memulai perintah kondisi : untuk variabel a sama dengan 1, jika variabel a kurang dari sama dengan variabel n, maka variabel a akan ditambahkan 1. clrscr(); Perintah membersihkan layar.