Ответ: Var A:integer;BeginRead(A);A:= A mod 12;if (A>=0)and(A<3) then Write(‘Зима’);if (A>2)and(A<6) then Write(‘Весна’);if (A>5)and(A<9) then Write(‘Лето’);if (A>8)and(A<=11) then Write(‘Осень’);End.
Напишите программу, которая вводит номер месяца и выводит название времени года. оператор выбора использовать не разрешается. При вводе неверного номера месяца должно быть выведено сообщение об ошибке. (ПАСКАЛЬ) — Правильный ответ на вопрос найдете ниже
18.02.2020 · 1