Напишите процедуру в Паскале, которая принимает параметр – натуральное число 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.

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

4 апреля 2023 03:49

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

Найти нужный

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

Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры. Пример входных данных. Понедельн... Расширение bmp.jpg.gif имеют... Какая из формул не содержит ошибок: а) =ЕСЛИ ((С4>4) И (C5>4)); "Принят!";"Не принят" б) =ЕСЛИ (И(D2=0;B2\4);D3-A1;D3+A1) в) =ЕСЛИ ((A4-0 И D1&l... 4 задание ОГЭ по информатике, помогите решить, само задание на картинке... Какие данные входят в состав пакета? 1) адрес получателя 2) адрес отправителя 3)число компьютеров в сети отправителя 4)контрольная сумма 5)назва...