Matris_1'den 15'e..

program dizi4;

var i,j,k : integer;



begin
k:=1;

for i := 1 to 3 do

begin
for j:= 1 to 5 do
begin
write(k:3);
k:=k+1;
end;
writeln;

end;

readln;
end.