Задание:
По введеному номеру месяца вывести название времени года, помогите пожалуйста… сделать через PASCAL, операторcase
Решение:
var k: integer; begin read (k); case k of 1… 2,12: write ('зима'); 3… 5: write ('весна'); 6… 8: write ('лето'); 9… 11: write ('осень'); end; end.
Знаете другой ответ?