Определите и выведите на экран кол-во натуральных чисел меньших 100 и делящихся на 5 и 7 одновременно

prostotak1970 prostotak1970    2   26.08.2019 06:00    0

Ответы
vevvrqc vevvrqc  05.10.2020 20:27
Program z1;
var k,i:integer;
begin
k:=0;
for i:=99 downto 5 do
if (i mod 5=0)and(i mod 7=0) then
k:=k+1;
writeln (k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика