Уровень а. (оценка 3). напишите программу, которая выводит m линий из символа s, заданного пользователем длиной n символов. при запуске программы m, n, s нужно ввести с клавиатуры. пример: количество линий: 2. длина цепочки: 7. символ-заполнитель: - для реализации программы напишите процедуру line, которая принимает два параметра – символ-заполнитель s и натуральное число n, и выводит на экран одну линию из символов s длиной n. пример: длина цепочки: 7. символ-заполнитель: -
raimalqueen
2
17.08.2019 21:00
3
Другие вопросы по теме Информатика
alholod2p00me0
28.11.2021 19:45
londonparisch
28.11.2021 19:45
nastyamashkina12
21.05.2019 22:08
Caflen
21.05.2019 23:00
dianadiadyshyn
05.07.2019 08:40
zybi
05.07.2019 08:40
zarasabaka
05.07.2019 08:40
Anna2004Shevtsova
04.12.2019 21:37
kiraivanova777
28.10.2020 13:25
Популярные вопросы
- 1. Какая стоянка эпохи бронзы была открыта Центрально-Казахстанской...
1 - Трикутник АВС і КТМ рівні,кути А і М,В і К відповідні,кутС=40*, МК=5см.Знайдіть...
2 - м ^3 в виде стандарт нужно написать...
1 - 1. Определите коэффициент и степень одночлена -5ах2 A) -5 и B) -5...
3 - Заданне Прочитайдва текста.Ничего в природе не могло быть лучше,...
1 - 1. Литературное направление, к которому относится произведение С.Н.Жунусова...
1 - Ребыт если вы понимаете по кыргызки то памагите прашу надо...
1 - 1. Каковы примечательные особенности Фергана-Ташкентскоголокального...
3 - Natural disasters like earthquakes, tornado, tsunami and floods happen...
2 - Оқушылар екі тақырыптың біреуін таңдап, орфографиялық нормаға сай...
3
Var
m,n,i:integer;
s:char;
procedure line(c:char;n:integer);
Var
i:integer;
begin
for i:=1 to n do
write(c);
writeln;
end;
begin
readln(m,n);
readln(s);
for i:=1 to m do
line(s,n);
end.
Пример ввода:
2
7
-
Пример вывода: