Напишите программу, которая строит "квадрат" из знаков '*' заданного размера. Используйте процедуру. Входные данные Входная строка содержит единственное натуральное число – длину стороны квадрата N . Выходные данные Программа должна вывести заполненный квадрат размером N × N , состоящий из знаков '*'.
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018 // Внимание! Если программа не работает, обновите версию! procedure ЗачемТутПроцедура(n:integer); begin MatrFill(n,n,'*').Println(1) end; begin ЗачемТутПроцедура(ReadInteger('n=')) end.
