Ответы
Ответ дал:
0
var
i, s: integer;
begin
s:=0;
for i:=1 to 99 do
if (i mod 2 <> 0) and (i mod 3 <> 0) then
inc(s, i);
writeln(s);
end.
i, s: integer;
begin
s:=0;
for i:=1 to 99 do
if (i mod 2 <> 0) and (i mod 3 <> 0) then
inc(s, i);
writeln(s);
end.
Вас заинтересует
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад