Программа запрашивает номер месяца и выдает время года, которому этот месяц принадлежит (например, 4- весна, 7 - лето)
Настюшка575
3
23.05.2019 20:40
0
Другие вопросы по теме Информатика
vikailen
25.05.2019 03:40
Tahir353
25.05.2019 03:40
joraninga
25.05.2019 03:50
Lanatm12
25.05.2019 01:41
gnkbdh
25.05.2019 03:50
rushsh1
25.05.2019 03:50
БЕКА200420042004
25.05.2019 03:50
TigerForceCasual
25.05.2019 03:50
Gelag
25.05.2019 03:50
Популярные вопросы
- Составить план чехова хамелеон с подпунктами ...
2 - Два екскаватора, працюючи разом, можуть виконати завдання за 6 годин. один екскаватор,...
2 - Квадрат периметр которого равен 24 см .прямоугольник длина которого 8 см а ширина...
1 - Спишите предлодения.раскройте скобки,поставив глаголы в будущем времени.укажите...
2 - Нужно вопрос №1 київський літопис київський патерик галицько-волинський літопис...
1 - На дворе весна.ярко светит солнце. весело журчат ручьи.кругом молодая травка.деревья...
3 - Синформатикой! ! x=2 read(x); y=(4x^2-5x+10) write(y);...
2 - Тема умножения и деления на двузначное число и на эту тему на каникулах ледовый...
1 - 25б. чему учили детей в афинах с 12 лет...
2 - Найдите отношения: а)15,4 k 7 б)8 2/7 k 2/21...
2
program raf105;
var m: integer;
begin
write('Введите номер месяца: ');
readln(m);
case m of
12,1,2: writeln('Это зима');
3..5: writeln('Это весна');
6..8: writeln('Это лето');
9..11: writeln('Это осень');
end;
end.
PascalABC 3.4.2