Напишите программу, которая принимает с клавиатуры целое число, а затем выводит 20 последующих за ним чисел. язык паскаль
209
377
Ответы на вопрос:
Var a: integer; begin write('введите целое число: '); readln(a); for a: = a+1 to a+21 do write(a,' ') end.
1) Максим (инженер) выиграл у Миши(капитана), Миша (капитан) у Вани(повар), Денис (логист) у Ярослава (повар, юрист)
2) Ярослав (повар, юрист) у Вани (повар)
3) Ярослав повар и юрист поэтому они оказались свободными от игр (тк ярослав не участвовал)
4) Миша(капитан) у Марка (юрист)
5) Турнир выиграли Инженер (Максим) и Капитан (Миша). Хуже всех выступил Денис (логист)
Объяснение:
Миша - капитан
Ваня - повар
Максим - инженер
Ярослав - повар и юрист
Денис - логист
Марк - юрист
Популярно: Информатика
-
alexguzz5517.06.2020 02:03
-
Lool19986527.11.2021 00:42
-
ekatsinrom19.03.2021 08:55
-
Ъъъъъъъъъъъъъъъъ19.09.2020 09:58
-
cygrobik11107.01.2022 15:25
-
EgueneOKSDFSOFK20.02.2020 09:46
-
дианакис05070623.09.2022 21:23
-
KaapaaToown01.08.2020 01:40
-
Thrillgang02.12.2021 06:42
-
орпасм01.05.2021 17:40