|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
29.04.2009, 21:15 | #1 |
Пользователь
Регистрация: 19.12.2008
Сообщений: 51
|
Паскаль. Перечислимый тип. Определение порядкового номера дня високосного года.
Пусть дан фрагмент программы:
type месяц = (янв. фев. мар. апр. май. сен. окт. ноя. дек ); var k: 1..366; d: 1..31; m: месяц; Определите k - порядковый номер дня високосного года, который имеет дату d,m. Паскаль, тема совсем новая, не всё понятно пока что... |
30.04.2009, 09:14 | #2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Ну тебе ж извесно сколько дней в каждом месяце?
Сделай массив из этих дней, потом получай сумму элементов массива с первого до m плюс d = то самое число. Смысл ясень?
I'm learning to live...
|
30.04.2009, 16:04 | #3 | |
Форумчанин
Регистрация: 07.04.2009
Сообщений: 245
|
Цитата:
Код:
Всякое безобразие должно быть единообразным. Тогда это называется порядком.
|
|
30.04.2009, 19:27 | #4 |
Пользователь
Регистрация: 19.12.2008
Сообщений: 51
|
Спасибо, я вроде бы понимаю смысл, но дальше... можно поподробнее пожалуйста??
Вообще по идее пользовательно вводит число и месяц, а программа должна вывести номер дня- я правильно понимаю?? |
30.04.2009, 20:06 | #5 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Прежде всего, тот пример, который вы привели, вообще написан с ошибками и не откомпилируется.
во-вторых, в TurboPascal нельзя использовать русские буковки в качестве идентификаторов типов и переменных... конечно, можно описать и вот так: Код:
и вообще, Катя, а зачем Вам вообще перечисляемый тип Месяц ?? он в данном случае только портит всё!!! вот, решение без этого типа: Код:
или вот предложенный Stilet'ом вариант с массивом, в котором задано количество дней в месяце: Код:
Последний раз редактировалось Serge_Bliznykov; 30.04.2009 в 20:09. |
30.04.2009, 21:29 | #6 |
Пользователь
Регистрация: 19.12.2008
Сообщений: 51
|
Спасибо огромное! Но м:МЕСЯЦ - это условие задачи! Его менять нельзя!
А не убирая его если, то как?? |
01.05.2009, 11:47 | #7 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Катя, давайте так — если Вы организуете ввод месяца вашего типа, тогда я помогу Вам написать код, вычисляющий номер дня K...
|
01.05.2009, 21:48 | #8 |
Пользователь
Регистрация: 19.12.2008
Сообщений: 51
|
begin
writeln ('vvedite mecyac'); writeln ('1- jan'); writeln ('2- feb'); writeln ('3- mar'); ........... writeln ('12-dec'); readln (i); case i of 1:m1:=jan; 2:m1:=feb; .............. 12:=ec; end; |
02.05.2009, 11:29 | #9 |
Пользователь
Регистрация: 19.12.2008
Сообщений: 51
|
Так вроде??
|
02.05.2009, 13:56 | #10 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
ну ладно.. тогда получите и распишитесь...
два варианта: первый: Код:
Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перевод номера дня в дату | DmT | Помощь студентам | 4 | 14.02.2009 16:12 |
Определение серийного номера логического устройства | Raikhman | Microsoft Office Excel | 5 | 09.02.2009 17:48 |
Определение номера телефона | xpress | Общие вопросы по Java, Java SE, Kotlin | 6 | 29.04.2008 20:02 |