Program Pencetak Angka Kelipatan Lima dengan Pascal

Ini adalah script pascal untuk mencetak angka kelipatan lima dengan menggunakan pascal. program ini menggunakan pengulangan for to do


program KelipatanLima ;


uses wincrt ;


var


a : integer ;


begin


     for a := 5 to 60 do
     begin
     if a mod 5 = 0 then
     write (a : 5) ;
     if a mod 20 = 0 then
     writeln ;
     end;
end.


---------------------------------
Hasil :


 5  10  15  20
25  30  35  40
45  50  60