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

Вот решение вашей задачи

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.