Ответы
Ответ дал:
0
procedure DashString(n: integer);
begin
Print('-'*n)
end;
begin
var n := ReadInteger('Введите n:');
DashString(n)
end.
Похожие вопросы
2 года назад
2 года назад
8 лет назад
8 лет назад
9 лет назад