Узнать дату след. дня |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Узнать дату след. дня |
Patrick |
Сообщение
#1
|
Группа: Пользователи Сообщений: 5 Пол: Мужской Репутация: 0 |
Решите пожалуйста задачу:
Надо узнать дату след. дня. Формат даты д/м/г. К примеру я ввожу 30.04.2000 Ответ: 1.05.2000. Я почти сделал, но надо ещё чтоб если ввели неверную дату к примеру 80.04.2000 Ответ был "Такого дня не существует" или если месяц неправильно, то "Такого месяца не существует" Делается все при помощи оператора "case". Я прикрепил файл с тем, что я делал. Сообщение отредактировано: Patrick - Прикрепленные файлы PROGA.PAS ( 947 байт ) Кол-во скачиваний: 217 |
andriano |
Сообщение
#2
|
Гуру Группа: Пользователи Сообщений: 1 168 Пол: Мужской Реальное имя: Сергей Андрианов Репутация: 28 |
Жуть.
Обычно это делается с помощью массива, в котором указываются длины месяцев: LenMonth : array[1..12]of integer = (31,28,31,30... Ну и, само собой, в феврале надо проверять на високосный год. Проверка делается при помощи того же массива. |
Patrick |
Сообщение
#3
|
Группа: Пользователи Сообщений: 5 Пол: Мужской Репутация: 0 |
Цитата Ну и, само собой, в феврале надо проверять на високосный год. нет, этого можно не делать кстати я уже сёдня её сделал, длиннющая получилась, так что можно тему эту закрывать |
andriano |
Сообщение
#4
|
Гуру Группа: Пользователи Сообщений: 1 168 Пол: Мужской Реальное имя: Сергей Андрианов Репутация: 28 |
Чего же тут длинного?
(без проверки на високосный год) const month : array[1..12]of integer = (31,28,31,30,31,30,31,31,30,31,30,31); |
Текстовая версия | 20.04.2024 5:33 |