Kali ini saya akan membagikan cara untuk membuat perkalian berderet atau perkalian faktorial dengan menggunakan bahasa pemrograman pascal. Pada program ini menggunakan perulangan. semoga bisa menambah wawasan bagi para pembaca semuanya.
berikut codingnya :
program perkalianderet;
uses crt;
var
batasawal,batasakhir,jumlah:real;
begin
clrscr;
writeln('masukan awal');
readln(batasawal);
writeln('masukan batas akhir'); readln(batasakhir);
jumlah:=1;
repeat
batasawal:=batasawal+1;
write(batasawal:2,'x':2);
jumlah:=jumlah*batasawal;
until batasawal=batasakhir;
write('=',jumlah);
readkey;
end.
berikut screenshootnya :