Написать программу, которая в диапазоне от 1 до 100000 считает количество чисел, которые делятся на 8 без остатка. (паскаль)
Ответы
Ответ дал:
1
Ответ:
Я уже дал ответ. Ты видимо не дождался и отчаялся :)
var
i: integer;
d: integer;
begin
d:=0;
for i:=1 to 100000 do begin
if (i mod 8) = 0 then
begin
d := d + 1;
end;
end;
writeln(d)
end.
danil212222222:
Я просто подумал ты ушёл =( спс ещё раз (☞゚ヮ゚)☞
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад