Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.10.2010, 16:41   #1
Intersap
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 23
По умолчанию "Программирование времени"

Дана задача на лабораторную:
Пусть Day – целое число в пределах от 1 до 365. Присвоить целой переменной DayWeek значение 1,2,...,7 в зависимости от того, на какой день недели припадает день Day. День недели для 1 января определяется константой FіrstDay. Год - 2010.
Не сложно определить по календарю что FirstDay = 5 (пятница). Но как написать программу - не знаю.
З.Ы. По специальности не програмист.
Intersap вне форума Ответить с цитированием
Старый 04.10.2010, 16:56   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Код:
DayWeek := ((Day + FirstDay - 2 ) mod 7 ) + 1;
-2 - это чтобы получить нулевое смещение для первого дня (ну, если FistrDay - понедельник и день первый, нужно, чтобы получился НОЛЬ.
mod 7 - это кратность дней недели (семь дней в неделе)
ну и +1 это чтобы понедельник вместо нуля стал единицей, вторник - двойкой и т.д.

проверяйте правильность!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 04.10.2010, 17:12   #3
Intersap
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 23
По умолчанию

а так как FirstDay =5 значит там будет -5 !?

-2 работает

Обьясните пожалуйста смысл следующего задания:
Изображения
Тип файла: jpg Безымянный.jpg (24.3 Кб, 148 просмотров)

Последний раз редактировалось Stilet; 05.10.2010 в 16:58.
Intersap вне форума Ответить с цитированием
Старый 04.10.2010, 17:39   #4
DRAgon™
Форумчанин
 
Аватар для DRAgon™
 
Регистрация: 14.03.2010
Сообщений: 362
По умолчанию

еще бы по мелче сделал
на форум кидай
Чем больше моя слава, тем я больше тупею; и таково, несомненно, общее правило.(А.Эйнштейн)
DRAgon™ вне форума Ответить с цитированием
Старый 05.10.2010, 16:03   #5
Intersap
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 23
По умолчанию

И если не сложно подскажите еще:
Определить Hour – полное количество часов і Mіnute – полное количество минут, какие прошли от начала суток до того момента (в первой половине суток), когда стрелка чаов повернулась на Angle градусов. Значение Angle вводиться з клавиатуры.
Intersap вне форума Ответить с цитированием
Старый 05.10.2010, 16:09   #6
Intersap
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 23
По умолчанию

и если можно еще один вопрос:
Визначити Hour – повну кількість годин і Mіnute – повну кількість хвилин, які пройшли від початку доби до того моменту (в першій половині доби), коли годинникова стрілка повернулась на Angle градусів. Значення Angle уводиться з клавіатури.
Intersap вне форума Ответить с цитированием
Старый 05.10.2010, 18:22   #7
Cookson
Пользователь
 
Регистрация: 14.04.2009
Сообщений: 16
По умолчанию

Цитата:
Сообщение от Intersap Посмотреть сообщение
и если можно еще один вопрос:
Визначити Hour – повну кількість годин і Mіnute – повну кількість хвилин, які пройшли від початку доби до того моменту (в першій половині доби), коли годинникова стрілка повернулась на Angle градусів. Значення Angle уводиться з клавіатури.

Код:
hours:=angle div 360;
minutes:=angle mod 360 div 6;
Cookson вне форума Ответить с цитированием
Старый 06.10.2010, 23:02   #8
Intersap
Пользователь
 
Регистрация: 25.03.2010
Сообщений: 23
По умолчанию

А если не сложно обьясните чего хотят в задаче на картинке, программу может напишу и сам, но не пойму саму задачу
Intersap вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как обойти "преобразование типа из "string" в "float" невозможно" lexluter1988 Помощь студентам 1 07.08.2010 12:23
при вводе на листе "магазин"- код товара появлялось "описание" товара из "склада" с "продажной ценой" aleksei78 Microsoft Office Excel 13 25.08.2009 12:04
запрашивает ввод времени суток и в зависимости от этого выводит на экран "Доброе утро", "Добрый день". Maria, Russia Помощь студентам 5 17.02.2009 21:44
Работа с String Grid - помогите написать "Табель рабочего времени" Deicider Помощь студентам 3 29.11.2006 20:59