Важная информация
Показано с 1 по 2 из 2

Тема: Нужно вычислить кол-во дней между датами

  1. #1 Нужно вычислить кол-во дней между датами 
    Новичок
    Регистрация
    13.10.2011
    Сообщений
    1
    Сказал(а) спасибо
    0
    Поблагодарили 0 раз(а) в 0 сообщениях
    Даны a1,b1,c1, и a2,b2,c2 которые обозначают две даты. Нужно вычислить кол-во дней между этими датами
    Ответить с цитированием  
     

  2. #2  
    Новичок
    Регистрация
    19.01.2013
    Сообщений
    9
    Сказал(а) спасибо
    0
    Поблагодарили 1 раз в 1 сообщении
    const
    m:array[0..12] of integer=(0,31,59,90,120,151,181,212,243,273,304,334,365);
    var
    a1,a2,b1,b2,c1,c2,day:integer;
    begin
    read(a1,b1,c1);
    read(a2,b2,c2);
    day:=abs(c1-c2)*365-m[abs(b1-b2)]-abs(a1-a2);
    write(day);
    end.


    Это без учета високосных годов
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Продвижение Вашего сайта в поисковых системах. Попадание в ТОП поисковой выдачи от 60 дней!*
    от Дмитрий Сатаров в разделе Оптимизация, продвижение и аудит
    Ответов: 6
    Последнее сообщение: 22.01.2013, 20:34
  2. Парадокс дней рождения. Проверка на Паскале =)
    от Абадябер в разделе Разработки на Turbo Pascal
    Ответов: 8
    Последнее сообщение: 19.01.2013, 19:22
  3. Ответов: 9
    Последнее сообщение: 10.12.2012, 21:50
  4. Ответов: 0
    Последнее сообщение: 21.11.2011, 15:26
  5. Ответов: 11
    Последнее сообщение: 25.12.2010, 02:33
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •