|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
15.01.2009, 22:17 | #1 |
Пользователь
Регистрация: 03.12.2008
Сообщений: 37
|
помогите пожалуйста решить задачу!
Народ, прошу Вас, я просто уже не знаю как ее решить... Это не задача, а жесть какая-то...
Type число=1..31; Месяц=(янв,фев,.....,дек); день недели=(вс,пн,....,сб); var d:число;m:месяц;wd1,wd;день недели;к:0..12; Считая,что год невисокосный и его 1 января приходится на день недели wd1,определить wd-день недели,на которой приходится день с датой d,m. |
15.01.2009, 22:44 | #2 |
Форумчанин
Регистрация: 02.01.2009
Сообщений: 340
|
Код:
DelphiWorld 6. Скачай, поставь, и будет тебе счастье=) Программирование, как и любовь -- одно слово, за которым скрывается бесконечное множество занятий.
|
27.05.2012, 13:22 | #3 | |
Пользователь
Регистрация: 09.01.2012
Сообщений: 10
|
Цитата:
А как можно решить ее же только без массивов?? |
|
28.05.2012, 12:02 | #4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
можно. например, через функцию + case of ...
а чем массив не угодил?! |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Помогите решить задачу ,пожалуйста | DimoniusX | Паскаль, Turbo Pascal, PascalABC.NET | 11 | 12.01.2009 19:57 |
Помогите решить задачу пожалуйста | Никитка89 | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 29.05.2008 08:35 |