Напишите процедуру в Паскале, которая принимает параметр – натуральное число N – и выводит на экран линию из N символов –.

Program prog1;
var
n,null:integer;
begin
null:=1;
write(Введите число:);
readln(n);
while n>=null do
begin
null:=null+1;
write(-);
end;
readln;
end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку