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

1 ответ

Посмотреть ответы

DevAdmin

1720

Var
n: integer;

procedure WriteNSymbols(n: integer; c: char);
var
i: integer;
begin
for i := 1 to n do
write(c);
end;

begin
readln(n);
WriteNSymbols(n, '-');
end.

Хороший ответ

5 апреля 2023 00:52

Остались вопросы?

Найти нужный

Еще вопросы по категории Информатика

Дискретность в информатике... Выдаёт ошибку (Встречено 'else', а ожидался оператор) Что делать?? Program R ; var a,b,c,x,D,x1,x2:real ; begin readln (a,b,c) ; D:= a*(x*x)+b*x+... 1. Факториалом числа п называется запись 1 х 2 х... x n. Обозначение: n! По данному натуральному числу и вычислить значение п! Пользоваться математиче... Каков вклад нашей страны в развитие мультипликации? Что способствовало развитию компьютерной анимации?... Количество разрядов, занимаемых двухбайтовым числом, равно:...