Пантелеймон
4 год назад
напишите программу, которая получает номер месяца и выводит ему соответствующее время года или сообщение об ошибки(язык паскаль)
ОТВЕТЫ
Genoveva
Nov 16, 2020
var monthNumber := ReadInteger;
begin
if (monthNumber >= 3) and (monthNumber <= 5) then begin
Print('Весна');
end else if (monthNumber >= 6) and (monthNumber <= 8) then begin
Print('Лето');
end else if (monthNumber >= 9) and (monthNumber <= 11) then begin
Print('Весна');
end else if (monthNumber = 12) or (monthNumber = 1) or (monthNumber = 2) then begin
Print('Зима');
end else begin
Print('Ошибка');
end
end.
95
Смежные вопросы: