Определить и вывести на экран количество трехзназных чисел ,которые делятся 3 , 5 и 7 одновременно
Определить и вывести на экран количество трехзназных чисел ,которые делятся 3 , 5 и 7 одновременно
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
var i,k: integer;
begin
k:=0;
for i:=100 to 999 do
if (i mod 3=0)and(i mod 5=0)and(i mod 7=0) then k:=k+1;
writeln(k);
end.