С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
25 / 25 / 28
Регистрация: 20.03.2011
Сообщений: 150
1

Строки: Программа должна вывести дату следующего дня в формате dd.mm.gggg

10.11.2011, 21:45. Показов 1674. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
1)Входной файл содержит дату в формате dd.mm.gggg.Гарантируется, что это корректная дата.
Программа должна вывести дату следующего дня в формате dd.mm.gggg.Гарантируется, что такая дата существует.
Пример:
Вход:31.12.0001
Выход:01.01.0002
2)Слово называется анаграммой другого слова, если оно может быть получено перестановкой его букв.
Во входном файле два слова в отдельных строках. Длина каждого слова не превышает 255 символов.
В выходной файл выведите "YES" - если введенные слова являются анаграммами друг друга, и "NO" - в противном случае.
Пример:
SHARM YES
MARSH

ANANAS NO
NASA
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.11.2011, 21:45
Ответы с готовыми решениями:

Ввести одну дату и вывести дату следующего дня
Ограничиться условными операторами. Не использовать библиотеки time, datetime етц

Ввести одну дату и вывести дату следующего дня
Примеры: 1) Введите дату в программу, и она должна вывести вам дату следующего дня. (Например:...

Вывести на экран дату следующего дня
ребят помогите пожалуйста с кодом, Ввести дату в формате ДД,ММ,ГГГГ.Вывести на экран дату...

Определить дату предыдущего дня и дату следующего дня
Условие 1::O_O: Дата некоторого дня определяется двумя натуральными числами m(порядковый номер...

1
159 / 152 / 50
Регистрация: 03.08.2011
Сообщений: 299
Записей в блоге: 14
10.11.2011, 23:10 2
Лучший ответ Сообщение было отмечено qwertyo как решение

Решение

Преобразование даты:
Delphi
1
2
3
function NextDate(nowDate:String):String;
  Result:=DateToStr(StrToDate(nowDate)+1)//Только для XX или более позднего века
end;
Проверка слов:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
function Anagramma(base,value:String):Boolean;
var
  i,tmpPos:Integer;
begin
  Result:=false;
  if length(value)=length(base) then
    begin
      for i:=1 to length(value) do
        begin
          tmpPos:=PosEx(value[i],base);
          if tmpPos<=0 then
            Exit
          else
            Delete(base,tmpPos,1)
        end;
      Result:=true
    end
end;
1
10.11.2011, 23:10
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.11.2011, 23:10
Помогаю со студенческими работами здесь

Вычислить дату следующего дня, предыдущего дня и число дней в месяце
Дата некоторого дня характеризуется трема натуральными числами - a (год), b (номер месяца), c...

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

Вводим дату выводим дату следующего дня. Как Оптимизировать
Вводим дату выводим дату следующего дня Как можно оптимизировать. Не использую специальные...

Заменить каждую дату сообщения на дату следующего дня
Слова сообщения разделяются пробелами и знаками препинания . В сообщении может содержаться дата в...

Заменить каждую дату сообщения на дату следующего дня
В сообщении может содержаться дата в формате дд.мм.гггг. В заданном формате дд - целое число из...

программа должна вывести текущую дату
вводим дату в формате DD//MM//YYYY и число n обозначающего количество прошедших дней.программа...


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

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