Рассматривается множество целых чисел, принадлежащих числовому отрезку [1721; 4322], которые делятся на 3 и 11 и не делятся на 5, 9, 13, 22. Найдите количество таких чисел и максимальное из них. В ответе запишите два целых числа без пробелов и других дополнительных символов: сначала количество, затем максимальное число. Для выполнения этого задания можно написать программу или воспользоваться редактором электронных таблиц.
Решите
295
349
Ответы на вопрос:
Решение
var count, max, i: integer;
begin
max := 0;
count := 0;
for i := 1721 to 4322 do begin
if (i mod 3 = 0) and (i mod 11 = 0) then
if i mod 5 <> 0 then
if i mod 9 <> 0 then
if i mod 13 <> 0 then
if i mod 22 <> 0 then begin
count := count + 1;
if i > max then
max := i;
end;
end;
writeln(count, max);
end.
ответ: 194191
Популярно: Информатика
-
18larina1822.05.2023 12:01
-
Ravshanbekovna28.10.2021 04:29
-
сарвиназ00207.04.2021 17:55
-
oksanakrasilnikova06.06.2022 22:27
-
JetBalance9715.07.2020 02:12
-
Катя56511129.06.2020 05:35
-
RaSyL11121.02.2020 07:49
-
prus3109Серж10.01.2023 11:18
-
Hika67808.06.2020 20:32
-
polinasenchenk05.06.2022 21:19