Ответы
Ответ дал:
1
var
a,s:integer;
begin
a:=9;
s:=0;
while a<99 do
begin
inc(a);
if (a mod 2 = 0) then
s:=s+a;
end;
end.
a,s:integer;
begin
a:=9;
s:=0;
while a<99 do
begin
inc(a);
if (a mod 2 = 0) then
s:=s+a;
end;
end.
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад