12 июля, 19:51

Написать программу на паскале: определить является ли год високосном

+2
Ответы (1)
  1. 12 июля, 20:59
    0
    var

    a: integer;

    begin

    readln (a) ;

    if (a mod 4 = 0) and (a mod 100 0) or (a mod 400 = 0) then

    writeln ('Год високосный')

    else

    writeln ('Год не високосный') ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Написать программу на паскале: определить является ли год високосном ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Новые вопросы по информатике
Переведите десятичное число 657 в 15-ичную систему счисления
Ответы (2)
Сколько операторов можно записать после служебных слов then и else?
Ответы (1)
Сколько действий выполняется после оператора then?
Ответы (1)
Напишите функцию, которая возвращает минимальное из двух чисел, полученных в качестве аргументов.
Ответы (1)
Зобразіть блок схему для розрахунку f=4x^3+2x-1, при x=8,16,24
Ответы (1)
1) К какому виду компьютеров относитьсая iPad? 2) Какие возможности компьютеров имеют мобильные телефоны? 3) Вам для следующих целей необходимо купить компьютер. Какой вы выберете?
Ответы (2)
Составить программу чисел с поиском количества чисел в диапазоне от 40 до 60
Ответы (1)
Определить объем памяти для хранения моноаудиофайла, время звучания которого составляет 5 минут при частоте дискретизации 44 кГц и глубине кодирования 16 бит
Ответы (1)
Скорость передачи данных через adsl-соединение равна 128000 бит/сек. Через данное соединение передают файл размером 0,5 кб. Определите время передачи файла в сек?
Ответы (1)
Найти значение параметра b в уравнении 2 * а + 3 * b = x при котором х = 21 параметра а = 3
Ответы (1)