Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
2 апреля 2023 03:49
440
Напишите процедуру в Паскале, которая принимает параметр – натуральное число N – и выводит на экран линию из N символов '–'.
1
ответ
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.
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.
0
·
Хороший ответ
4 апреля 2023 03:49
Остались вопросы?
Еще вопросы по категории Информатика
сколько времени будет скачиватся аудиофайл размером 7200 кбайт при интернет-соединении с максимальной скоростью скачивания 192 кбит/с...
Вычислить значение суммы s = 1+2+3+…+n для заданного n. Составить блок-схему от реки...
Что пропущено в ряду Символ - ... - строка фрагмент текста...
запишите наименьшее четырехзначное число в пятеричной системе счисления. Помогите пожалуйста,буду очень благодарна...
Мальчики играли в шпионов и закодировали сообщение придуманным шифром. В сообщении присутствуют только буквы из приведённого фрагмента кодовой таблицы...