Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/15: Рейтинг темы: голосов - 15, средняя оценка - 5.00
2 / 2 / 3
Регистрация: 19.06.2011
Сообщений: 82
1

Считая, что год невисокосный и 1 января приходится на день недели wd1, определить: k - количество понедельников в году, приходящихся на 13-е число

19.06.2011, 18:09. Показов 2882. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Не получается написать программку к задачке:
(Буду рад если сможете написать мат.модель к ней, т.к. не понимаю само ее осуществление в делфи)

type месяц = ( янв, фев, мар, апр, май, июн, июл, авг, сен, окт, ноя, дек );
деньнедели = (вс,пн,вт,ср,чт,пт,сб);
var k1:0..12; d:1..31; m:месяц; wd1,wd:деньнедели;

Считая, что год невисокосный и его 1 января приходится на день недели wd1, определить:

k - количество понедельников в году, приходящихся на 13-е числа.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.06.2011, 18:09
Ответы с готовыми решениями:

считая что год не высокосный и известен день, на который приходится 1 января, подсчитать количество понедельников в году приходящихся на 13-е число
считая что год не высокосный и известен день, на который приходится 1 января, подсчитать количество...

Считая, что год не високосный и его 1 января приходится на день недели
Добрый вечер, есть вот такая вот задача Считая, что год не високосный и его 1 января приходится...

Определить количество понедельников в году, приходящихся на 13-е число
Определить количество понедельников в году, приходящихся на 13-е число, считая, что год не...

Определить, на какой день недели приходится 1 число любого месяца при заданном дне недели 1 января
Определит на какой день недели относиться 1 число любого месяца при заданном дне недели 1 января...

1
magirus
19.06.2011, 18:13     Считая, что год невисокосный и 1 января приходится на день недели wd1, определить: k - количество понедельников в году, приходящихся на 13-е число
  #2
 Комментарий модератора 
называйте темы информативно
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.06.2011, 18:13

Определите количество понедельников в году, приходящихся на 13-е число
Дан фрагмент программы. type число = 1..31; месяц = (янв, фев, мар, апр май июн июл авг...

Определить количество понедельников в году, приходящихся на 13-е числа
type число=1..31 месяц=(янв,фев,мар,апр,май,июн,июл,авг,сен,окт,ноя,дек); ...

Определить день недели, который приходится на 1 января
составить программу ля определения дня недели, который приходится на 1 января любого года ХХ века...

Получить номер дня и месяца и определить дату следующего дня (считая, что год невисокосный)
Всем привет! Буду очень благодарен если поможете составить программу в PascalABC. Условие звучит...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru