Matris 1-15; II.Yöntem

program dizi4;

var i,j,k : integer;



begin

for j:= 1 to 15 do
begin
write(j:3);

if j mod 5=0 then
writeln;
end;


readln;
end.