Написать программу : 1. имеется набор состоящий из натуральных чисел определите макси- мальное число, кратное 5. программа получает на вход количество чи- сел в последовательности, а затем сами числа. 2. имеется набор состоящий из натуральных чисел определите сумму чисел, оканчивающихся на 4. программа получает на вход количество чисел в последовательности, а затем сами числа. 3. имеется набор состоящий из натуральных чисел определите сумму чисел, кратных . программа получает на вход количество чисел в по- следовательности, а затем сами числа. 4. имеется набор состоящий из натуральных чисел найдите сумму всех чисел, кратных 6 и оканчивающихся на 4. числа последователь- ности определите с генератора случайных чисел random(x).
167
481
Ответы на вопрос:
// pascalabc.net 3.3 begin var n: =readinteger('n = '); var a: =readarrinteger('введите '+n+' чисел: ',n); writeln('1. максимальное число, кратное 5 = ', a.where(x-> x mod 5=0).max); writeln('2. сумма чисел, оканчивающихся на 4 = ', a.where(x-> x mod 10=4).sum); writeln('3. сумма чисел, кратных 7 = ',a.where(x-> x mod 7=0).sum); var b: =arrrandom(n,10,90).println; writeln('4. сумма всех чисел, кратных 6 и оканчивающихся на 4 = ', b.where(x-> (x mod 6=0)and(x mod 10=); end. пример: n = 30 введите 30 чисел: 73 81 14 32 26 20 26 83 36 39 69 22 10 75 24 47 40 12 27 20 78 15 72 18 83 59 40 89 47 87 1. максимальное число, кратное 5 = 75 2. сумма чисел, оканчивающихся на 4 = 38 3. сумма чисел, кратных 7 = 14 84 57 88 50 41 85 28 15 47 48 46 69 41 56 89 19 54 74 33 58 83 66 40 35 89 80 12 86 46 14 4. сумма всех чисел, кратных 6 и оканчивающихся на 4 = 1384. сумма всех чисел, кратных 6 и оканчивающихся на 4 = 0
Пример работы: [на фото].
Var X: Integer;
begin
Write('Введите число Х:');
Readln(X);
if X = 1 then Writeln('Красный')
else If X = 2 then Writeln('Зелёный')
else Writeln('Синий');
Readln;
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ArtemD9817.04.2020 23:42
-
павел41224.09.2021 23:31
-
Kseniya0507.09.2020 06:42
-
Kisapodkaifom09.05.2022 13:28
-
лох25110.05.2022 14:11
-
belkairi20.02.2022 16:15
-
Maxutka00710.04.2021 19:21
-
ннннннннр05.05.2020 14:19
-
KatePie10.11.2022 00:59
-
usenov77719.07.2020 06:21
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.