Make a program (Pascal): given numbers from 1 to 15 and they must be displayed on the screen in the form of a table.

prog fgr; / the name of the program, you may still need to record the user.
var i, x, y: integer; / variables of integer type;
begin / program body;
i: = 1; / assign a value;
for x: = 1 to 3 do / create a table (three rows);
begin
for y: = 1 to 5 do / create a table (five numbers);
begin
write (i: 3);
inc (i); / counter number +1;
end;
writeln; /output;
end; / close the table.
end. / end of the program.