определите и выведите на экран количество трехзначных чисел, ...
определите и выведите на экран количество трехзначных чисел, которые делятся одновременно на 3,5,7
в паскале авс
ПОМОГИТЕЕЕЕЕ!!!
Есть ответ
12.12.2022
186
Ответ
Program zadanie1;
var
i:integer;
begin
for i:=100 to 999 do Begin if ( i mod 3 = 0 ) and ( i mod 5 = 0 ) and ( i mod 7 = 0 ) then writeln(i); end;
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
12.12.2022