С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/18: Рейтинг темы: голосов - 18, средняя оценка - 4.67
 Аватар для HatakiKakashi
0 / 0 / 0
Регистрация: 28.05.2011
Сообщений: 27

Заданы два целых числа - год и номер месяца.

04.06.2011, 15:52. Показов 3514. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Привед помогите решить задачу с кейзом
Заданы два целых числа - год и номер месяца. Определить (используя оператор выбора ):
- полугодие (первое или второе)
- квартал ( первый, второй , третий, четвёртый)
- время года (зима, весна ,лето , осень)
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
04.06.2011, 15:52
Ответы с готовыми решениями:

Даны два целых числа: D (день месяца) и M (номер месяца в году). Вывести знак зодиака, соответствующий этой дате.
Помогите пожалуйста сделать не знаю даже с чего начать Даны два целых числа: D (день месяца) и M (номер месяца в году). Вывести знак...

Известны год и номер месяца рождения человека, а также год и номер месяца сегодняшнего дня
Известны год и номер месяца рождения человека, а также год и номер месяца сегодняшнего дня (январь — 1 и т. д.). Определить возраст...

Заданы три натуральных числа А, В, С, которые обозначают число, месяц и год. Найти порядковый номер даты, начиная отсчет с начала года
Заданы три натуральных числа А, В, С, которые обозначают число, месяц и год. Найти порядковый номер даты, начиная отсчет с начала года.

1
Mobile Software Engineer
Эксперт С++
 Аватар для Ev[G]eN
5381 / 1585 / 956
Регистрация: 23.01.2011
Сообщений: 3,214
04.06.2011, 18:55
Лучший ответ Сообщение было отмечено HatakiKakashi как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
 m, y: integer;
begin
 readln(m, y);
  if m in [1..12] then
   begin
    case m of
     12, 1, 2: writeln('Зима!');
     3..5: writeln('Весна!');
     6..8: writeln('Лето!');
     9..11: writeln('Осень!');
    end;
    case m of
     1..6: writeln('Первое полугодие!');
     7..12: writeln('Второе полугодие!');
    end;
   end
  else writeln('Номер месяца введен неверно!');
end.
Добавлено через 27 секунд
что за кварталы понятия не имею..вы хоть что то пытаетесь решать сами?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
04.06.2011, 18:55
Помогаю со студенческими работами здесь

Заданы два натуральных числа. Вычислить порядковый номер даты, начиная отсчет с начала года
Заданы два натуральных числа a,b которые обозначают число и месяц не високосного года. Вычислить порядковый номер даты, начиная отсчет с...

Как сравнить год со строкой, где год указан после числа и месяца через точки
Здравствуйте. Мне нужно отобрать даты, где год больше, чем 1984: Сам понимаю, что такой код: if...

Известны год и номер месяца рождения человека, определить его возраст
Известны год и номер месяца рождения человека, а также год и номер месяца сегодняшнего дня (январь — 1 и т.д.). Определить возраст человека...

Известны год, номер месяца и день рождения каждого из двух человек
Известны год, номер месяца и день рождения каждого из двух человек. Определить кто из них старше.

Получить день и номер месяца и определить дату следующего дня (считать год невисокосным)
Напишите программу, которая получает день и номер месяца и определяет дату следующего дня. Считайте, что год невисокосный (365 дней). ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru