Есть ответ 👍

Напишите программу, которая принимает с клавиатуры целое число, а затем выводит 20 последующих за ним чисел. язык паскаль

209
377
Посмотреть ответы 2

Ответы на вопрос:

PaFaS123
4,7(46 оценок)

Var a: integer; begin write('введите целое число: '); readln(a); for a: = a+1 to a+21 do       write(a,' ') end.

1) Максим (инженер) выиграл у Миши(капитана), Миша (капитан) у Вани(повар), Денис (логист) у Ярослава (повар, юрист)

2) Ярослав (повар, юрист) у Вани (повар)

3) Ярослав повар и юрист поэтому они оказались свободными от игр (тк ярослав не участвовал)

4) Миша(капитан) у Марка (юрист)

5) Турнир выиграли Инженер (Максим) и Капитан (Миша). Хуже всех выступил Денис (логист)

Объяснение:

Миша - капитан

Ваня - повар

Максим - инженер

Ярослав - повар и юрист

Денис - логист

Марк - юрист

Популярно: Информатика