Ответы на вопрос:
Var a, b: integer; begin write('введите пол (0 - ж, 1 - м) и возраст свой: '); readln(a, b); if (a = 0) then writeln('возраст вашего суженого (не советую под стандарты подстраиваться): ', b * 2 - 14); if (a = 1) then writeln('возраст вашей будущей жены: ', b / 2 + 7); end. такие дела =)
Популярно: Информатика
-
Никита2022005.03.2020 09:28
-
nikakrasovska16.04.2021 06:31
-
zahidamamirova25.11.2022 09:49
-
ls0xhand21.09.2022 19:36
-
pichtook115.01.2023 13:58
-
Uchenicza01.11.2021 02:35
-
Mayramukovsaid14.05.2021 01:15
-
pashka406007.06.2021 00:16
-
Сонька76625.11.2020 14:47
-
Nezhdanchik22815.05.2023 00:21