Решить методом таблиц истинности три друга — пётр, роман и сергей — учатся на , и факультетах. если пётр , то сергей не . если роман не , то пётр . если сергей не , то роман — . сможете ли вы определить специальности каждого?
269
489
Ответы на вопрос:
Var n: integer; begin writeln('январь - первый месяц'); writeln('введите номер месяца'); readln(n); case n mod 12 of 0,1,2: write('зима'); 3,4,5: write('весна'); 6,7,8: write('лето'); 9,10,11: write('осень'); end; end.
Популярно: Информатика
-
нина65505.07.2021 22:45
-
denisprokopev03.11.2020 21:02
-
xexi04.03.2023 17:40
-
ОливияСэм14.03.2023 00:23
-
kirkanobotan23.10.2020 12:16
-
rikgetikov06.09.2021 11:48
-
Annkot2226.03.2022 17:12
-
pogoreiko29.06.2023 00:10
-
жанат1715.10.2020 13:46
-
ffjrppyegxvhd14.03.2020 10:22