• Нужно составить программу, которая сможет вывести число, месяц и день недели, которые наступят через K дней, начиная с первого января 2008 года. Напомним, что это был вторник.

    Язык : Паскаль.

    Целое число K (0 <= K <= 1000)
    Пример:
    -------------------------------------------------------------------------------------
    Входа:                     |                Выхода:                          
    0                              |                Tuesday, 01.01
    5                              |                Sunday, 06.01 
    ------------------------------------------------------------------------------------

Ответы 6

  • Я знаю лишь pascal ABC, который, как стало известно, закрыли в 2007
  • Так это он и есть, хех.
    • Автор:

      con0tlm
    • 6 лет назад
    • 0
  • Прошу прощения, .NET
    • Автор:

      madalyn
    • 6 лет назад
    • 0
  • ну так, а я о стандартном
    • Автор:

      frederick
    • 6 лет назад
    • 0
  • Ладно, во всем виновата моя неосведомленность. Спасибо. Удачи.
    • Автор:

      tuckggso
    • 6 лет назад
    • 0
  • // Я очень, невероятно не люблю изобретать велосипеды//Поэтому воспользуемся уже встроенным типом DataTime//Pascal ABC.NET Версия 2.2 Сборка 790uses system;var k:integer;startSys:DateTime; //сабжm,d:string;begin;readln(k);startSys:=startSys.AddYears(2007); //добавляет года к старту, отсчёт от 1startSys:=startSys.AddDays(k); //добавляет кол-во дней//тип сам определяет високосный год или нетwriteln(startSys.DayOfWeek,', ',startSys.Day,'.',startSys.Month); //выводend.
    • Автор:

      monica
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years