Program Faktorial

Program ini untuk menghitung faktorial dari bilangan yang dimasukkan. Selamat mencoba!

program faktorial;
uses wincrt;
var
i,n,f:integer;
begin
write('masukkan bilangan yang ingin difaktorialkan = ');

readln(n);
f:=1;
while i<n do
begin i:=i+1;
f:=f*i;
end;
write(n,'! = ',f);
end.

Output yang dihasilkan adalah sebagai berikut.

Pernyataan Input dan Output pada Pascal

Dalam bahasa Pascal pernyataan input adalah pernyataan yang digunakan untuk memasukkan data. Pernyataan input yang ada di Pascal adalah READ dan READLN. Sedangkan pernyataan output adalah pernyataan yang digunakan untuk menampilkan hasil. Ada dua pernyataan output yaitu WRITE dan WRITELN. Berikut ini contoh program Pascal tentang cara melakukan input nama dan NRP (nomor induk mahasiswa).

program nama_nrp;

uses wincrt;

var nama: char;

nrp: longint; 

begin write('Nama : '); 

readln(nama);

 write('NRP  : '); 

readln(nrp); 

end.

Setelah program tersebut di running, maka akan keluar output sebagai berikut.