Информатика | 5 - 9 классы
Составить программу в паскале!
9 класс!
СРОЧНО!
Пожалуйста!
Без всяких div и mod.
Год является високосным, если его номер кратен 4.
Из кратных 100 високосными являются лишь те года, которые кратны также 400 (например, 1700, 1800 и 1900 — не високосные года, 2000 — високосный).
Дано натуральное число n.
Определить, является ли високосным год с таким номером.
Написать программу на паскале : определить является ли год високосном?
Написать программу на паскале : определить является ли год високосном.
Задача?
Задача.
Год является високосным, если его номер кратен 4, однако из кратных 100 високосными являются лишь кратные 400.
Например 1700, 1800, 1900 - не високосные, а 2000 високосный.
Дано натуральное число n.
Определить, является ли високосным год с таким номером?
Решить на паскале, уровень 8 класса!
Помогите пожалуйста?
Помогите пожалуйста.
Паскаль авс используя дату текущего дня, вычислить следующую дату.
Сначала с помощью инструкции case проверить , является ли текущий день последним днём месяца.
Затем проверить, является ли текущий месяц днём декабрем : если нет, то номер месяца увеличить на 1, если да то номер года, а номер месяца оставить равен 1 (учесть возможность ввода високосного года(если год / 4 = 0, то год високосный)).
Написать алгоритм нахождения числа дней в месяце, если даны : Номер месяца n - целое число а, равное 1 для високосного года и равное 0 в противном случае?
Написать алгоритм нахождения числа дней в месяце, если даны : Номер месяца n - целое число а, равное 1 для високосного года и равное 0 в противном случае.
Вычислите и выведите на экран примерное число прожитых человеком дней (без учѐта високосных лет) , если в году 365 дней, а год рождения и текущий год запрашиваются у пользователя вашей программы?
Вычислите и выведите на экран примерное число прожитых человеком дней (без учѐта високосных лет) , если в году 365 дней, а год рождения и текущий год запрашиваются у пользователя вашей программы.
Паскаль.
Помогите срочно!
Записать решение задач в Pascal Abc :1?
Записать решение задач в Pascal Abc :
1.
Определить есть ли в составе трехзначного числа одинаковые цифры.
2. Вводятся два числа, определить одного они знака или нет.
3. Определить принадлежит ли х отрезку от 1 до 5.
Границы входят в интеграл.
4. Определить является ли автобусный билет счастливым.
5. Является ли год с порядковым номером х високосным или нет.
Написать в паскале Определить количество дней в году, который вводит пользователь?
Написать в паскале Определить количество дней в году, который вводит пользователь.
В високосном годе - 366 дней, тогда как в обычном 365.
Написать алгоритм нахождения числа дней в месяце, если даны : Номер месяца n - целое число а, равное 1 для високосного года и равное 0 в противном случае?
Написать алгоритм нахождения числа дней в месяце, если даны : Номер месяца n - целое число а, равное 1 для високосного года и равное 0 в противном случае.
Человеку сегодня исполнилось R лет?
Человеку сегодня исполнилось R лет.
Сколько ему дней, часов, минут, секунд (високосные годы не учитывать).
Спасибо.
Дан номер года?
Дан номер года.
Определить, является ли он високосным (год является високосным, если его номер делится на 4, за исключением тех, которые делятся на 100 и не делятся на 400).
Нужно на С + +.
Вы находитесь на странице вопроса Составить программу в паскале? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 5 - 9 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Programm p ;
var n : integer ;
begin
readln(n) ;
if n / 4 = int(n / 4) then
begin
if (n / 100 = int(n / 100))and(n / 400< ; > ; int(n / 400)) then
writeln('Не високосный') else
writeln(' \ Високосный' ;
end
else writeln('Не високосный')
end ;