Как сделать поле из звездочек (16*16) - Pascal ABC

Формулировка задачи:

Ну я пробовал и ничего не получилось (как всегда):

uses GraphABC;
var a,b:integer;
begin
a:=0;
b:=0;
while (a<>16) do begin
a:=a+1;
print('*');
while (b<>16) do begin
b:=b+1;
println('*');
 
end;
end;
 
end.

Решение задачи: «Как сделать поле из звездочек (16*16)»

Листинг программы

uses GraphABC;
var i,j:integer;
begin
  for i := 1 to 16  do 
  begin
    println();
    for j := 1 to 16  do print('*');
  end;
end.

Объяснение кода листинга программы

В начале объявляются необходимые переменные: i и j типа integer.
Затем идет использование пространства имен GraphABC.
В цикле for i := 1 to 16 итерируется от 1 до 16.
Внутри этого цикла выводится пустая строка с помощью функции println().
Затем идет внутренний цикл for j := 1 to 16, который также выполняется от 1 до 16.
Внутри этого внутреннего цикла выводится символ '*' с помощью функции print().
Цикл внутренних циклов завершается, когда значение переменной j становится равным 17.
После завершения внутреннего цикла выводится еще одна пустая строка с помощью функции println().
Цикл внешних циклов завершается, когда значение переменной i становится равным 18.