Форум программистов, компьютерный форум, киберфорум
Наши страницы
Lazarus
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Настя Мулан
1 / 1 / 0
Регистрация: 11.02.2017
Сообщений: 24
1

Вывести число дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней

19.02.2017, 18:26. Просмотров 1095. Ответов 1
Метки нет (Все метки)

Дан номер некоторого года (положительное целое число). Вывести число дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней. Високосным считается год, делящийся на 4, за исключением тех годов, которые делятся на 100 и не делятся на 400 (например, годы 300, 1300 и 1900 не являются високосными, а 1200 и 2000 — являются). задание нужно сделать для программы Лазариус
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.02.2017, 18:26
Ответы с готовыми решениями:

Вывести число дней в заданном году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней
11 Дан номер некоторого года (положительное целое число). Вывести число дней в этом году, учитывая,...

Дан номер года (положительное целое число). Определить количество дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный
Дан номер года (положительное целое число). Определить количество дней в этом году, учитывая, что...

Определить количество дней в этом году, учитывая високосный год
Дан номер года. Определить количество дней в этом году, учитывая, что обычный год насчитывает 365...

Условный оператор: по номеру года определить високосный год или нет и вывести количество дней в году
Помогите написать программу. По номеру года определить високосный год или нет и вывести количество...

Дан номер некоторого года. Вывести число дней в этом году
17. Дан номер некоторого года (положительное целое число). Вывести число дней в этом году,...

1
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4890 / 3430 / 4026
Регистрация: 05.06.2014
Сообщений: 17,173
19.02.2017, 18:54 2
Лучший ответ Сообщение было отмечено Настя Мулан как решение

Решение

Delphi
1
2
3
4
if ((i mod 4 = 0) and (i mod 100 <> 0)) or (i mod 400 = 0) then 
 writeln('Високосный')
else 
 writeln('Невисокосный');
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.02.2017, 18:54

Дан номер некоторого года. Вывести число дней в этом году
IV.Условные операторы 28. Дан номер некоторого года (положительное целое число). Вывести число...

Как узнать что год високосный и сколько дней в месяце?
Как узнать что год високосный и сколько дней в месяце(28,29,30,31)

вывести к-во дней в месяце. Учесть високосный год или нет
Составить программу, которая в зависимости от порядкового номера месяца выводит на экран количество...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.