1. Информатика
  2. с клавиатуры вводятся

с клавиатуры вводятся 5 натуральных чисел. определить, есть ли среди них числа, которые нацело делятся на 5 (вывести их на экран).

valerea0 valerea0    3   30.05.2019 15:20    4

Ответы
olga877 olga877  30.06.2020 16:48
Program test;
var  a,i:integer;
begin
for i:=1 to 5 do
begin
readln(a);
if a mod 5 =0 then writeln('число ',a,' делиться нацело на 5');
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
vabik1983 vabik1983  01.11.2019 17:41
Який параметр дає змогу операційній системі microsoft windows періодично перевіряти найновіші оновлення : 1. оновлення антивірусу; 2. брандмауер windows; 3. автоматичні оновленняю;...
JoiLok JoiLok  01.11.2019 17:34
Существует ли система счисления, в которой число 25,записанное в данной системе счисления, равняется кубу целого числа, записанного в этой же системе? если да, то укажите её...
Щащашчщ Щащашчщ  01.11.2019 19:25
Оформите программу на c++ обеспечивающую: -заполнение одномерного массива а с клавиатуры g вещественными значениями -за минимальное число проходов по массиву а последовательно...
shishckinayuly shishckinayuly  01.11.2019 19:25
Разработайте программу, которая для двумерного вещественного массива txd выводит на экран элементы, значения которых не меньше заданного числа z, а остаток деления каждого...
helooooo helooooo  01.11.2019 19:14
Представление информации в персональном компьютере​...
Маруся1799 Маруся1799  01.11.2019 19:11
Информатика! разведчик шифрует текст, используя 16 символов. при этом использует код с постоянной длиной, и каждый символ кодируется минимально возможным количеством бит. сколько...
varvarec varvarec  01.11.2019 19:05
Сделать программу вычисляющую сумму и количество отдельно четных, отдельно нечетных чисел,которые лежат в диапазоне от 30-99....
tryx3 tryx3  25.01.2021 17:47
Для составления цепочек разрешается использовать 5 бусинок, помеченных буквами А Б Е Ж И. Каждая цепочка должна состоять из 4 бусинок, при этом должны соблюдаться правила:...
lilichka0109 lilichka0109  01.09.2020 13:12
Як називається службова програма операційної системи Windows, призначена для перегляду, пошуку та вставлення в документи символів з різних шрифтів, поданих з використанням...
tanushkash05 tanushkash05  27.06.2019 12:00
Turbo pascal выведите на экран 16 случайных чисел 16-ю разными цветами на черный экран, сопровождая вывод каждого цвета звуком....

Популярные вопросы