Ответы
Ответ дал:
0
var
i,n: integer;
begin
n:=0;
for i:=100 to 999 do
if (i mod 100=0) or (i mod 43=0) then
begin
n:=n+1;
writeln (i);
end;
writeln ('количество чисел кратных 100 или 43= ',n);
end.
Ответ дал:
0
Спасибо большое.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад