Ini adalah program sederhana dengan perulangan for untuk menghitung jumlah dari 5 bilangan yang dimasukkan.
program jumlah_bilangan;
uses wincrt;
var
i, jum,bil: integer;
begin
jum:=0; {inisialisasi}
for i:=1 to 5 do
begin
write(‘Masukkan Bilangan = ‘);readln(bil);
jum:=jum+bil;
end;
writeln(‘Jumlah Bilangan = ‘,jum);
end.
Tags : Pascal, Contoh program pascal, perulangan for, penjumlahan 5 bilangan.
terima kasihh
BalasHapus