Рассматривается множество целых чисел, принадлежащих числовому отрезку [1740; 14454], которые делятся на 4 и 5 и не делятся на 8, 12, 16, 30. Найдите количество таких чисел и минимальное из них. В ответе запишите два целых числа без пробелов и других дополнительных символов: сначала количество, затем минимальное число.
блок схема!!!!
Answers & Comments
Паскаль:
var count, min, i: integer;
begin
min := 20000;
count := 0;
for i := 1740 to 14454 do begin
if (i mod 4 = 0) and (i mod 5 = 0) then
if i mod 8 <> 0 then
if i mod 12 <> 0 then
if i mod 16 <> 0 then
if i mod 30 <> 0 then begin
count := count + 1;
if i < min then
min := i;
end;
end;
writeln(count, min);
end.
Ответ: 2121780.