Уровень А. (оценка 3). Напишите программу, которая выводит M линий из символа S, заданного пользователем длиной N символов. При запуске программы M, N, S нужно ввести с клавиатуры. Пример: Количество линий: 2. Длина цепочки: 7. Символ-заполнитель: - ------- ------- Для реализации программы напишите процедуру Line, которая принимает два параметра – символ-заполнитель S и натуральное число N, и выводит на экран одну линию из символов S длиной N. Пример: Длина цепочки: 7. Символ-заполнитель: - -------

//PascalABC.NET 3.2 сборка 1318Var  m,n,i:integer;  s:char;procedure line(c:char;n:integer);Var  i:integer;beginfor i:=1 to n dowrite(c);writeln;end;  beginreadln(m,n);readln(s);for i:=1 to m doline(s,n);end.Пример ввода:27-Пример вывода:--------------