Ввести название месяца и вывести на экран время года Pascal

Question

35

Ввести название месяца и вывести на экран время года Pascal

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

asik32 · Accepted Answer

91

asik32

30 января 2023

var n: integer; begin cls; writeln ('Введите номер месяца'); readln (n); if (n=1) or (n=2) or (n=12) then writeln ('Зима') else if (n=3) or (n=4) or (n=5) then writeln ('Весна') else if (n=6) or (n=7) or (n=8) then writeln ('Лето') else writeln ('Осень'); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: