Напишите программу, которая по количеству дней выводит возможные варианты названия месяца и его номера.
Rus1411
2
09.06.2020 23:06
0
Другие вопросы по теме Информатика
ClarisVerbis
13.12.2019 08:03
arsenijakula
13.12.2019 08:01
salavatshakiro
13.12.2019 08:00
arslando
13.12.2019 07:58
ruslan426
13.12.2019 07:57
andreweeoneoff
13.12.2019 07:51
kudadiana3101
19.11.2020 08:32
SOSmi
19.11.2020 08:32
Mimi67392
19.11.2020 08:32
Популярные вопросы
- ABCD тіктөртбұрышында AB=3 см, ВС=4 см және N АВ қабырғасының ортасы....
3 - 4. Запици у порядку спадання всі можливі натуральні числа, якіскладаються...
2 - А и та же примета сохраня же огненный куст рябины за Лариным прудом или...
2 - За до географічного атласу визначте 1-2 країни, які первинні спеціалізації....
1 - я взагалі не розумію інформатики, можете це зробити або хочаб пояснити...
1 - -тапсырма. br / Бағандағы сөздерден сөйлем құрап жаз. Құрамында br /...
1 - Суретте массасы 2 кг дененің жылдамдық проекциясының уақытқа тәуелділік...
1 - Y+2,18=-4,7a-5,2=-9,23 4,2×(0,25+x)=1,47решите уравнение ...
2 - Көрсетілген иондарды тұнбаға түсіретін катиондарды анық- таңдар:s, so...
3 - 1)каршар бургеден калай кутылды? 2)Байрактын неше карындасы бар ? 3)Жалган...
1
Var A:integer;
Begin
Read(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.
Объяснение: