dokter matematika

Selamat datang di posingan dokter matematika ini, :)
Ya.. Kali ini kita akan membahas mengenai penggunaan pascal untuk membuat program faktorial. Output yang dihasilkan seperti berikut.

Nah untuk membuat program diatas, enkripsi yang dibutuhkan adalah sebagai berikut.


program Mencari_Nilai_PI;
uses wincrt;
var
i,n,k,f:integer;
pi:real;
begin
write('n ');readln(n);
k:=0;
f:=1;
for i:=1 to n do
    begin;
    k:=k+1;
    f:=f*k;
    writeln(f,' ',k);
    end;
end.

selamat mencoba,
salam hangat dari dokter matematika. :)