Пожалуйста посчитайте пожалуйста!!!!! Нужно написать программу в Паскаль, чтобы на экран выводился квадрат из звездочек.

var
i,j, n:integer;
begin
Write('Введите размер стороны квадрата -> ');
Readln(n);
for i:= 1 to n do
  begin
  for j:= 1 to n do
    Write('*');
  Writeln;
  end;
end.