Ответ 10. код проги на паскале ниже
program a2;
var i, x: integer;
begin
for i:= 1 to 100 do if (x div 10 = 0) or ((x div 10 mod 2 = 1) and (x >= 50)) then x:=x+1;
writeln(x);
end.
Полезность це колы ты всим нужен и ты вмиеш це робыти .
5(10с.с.)=10(5с.с.)
6=<span>11
7=12
8=13
9=14
10=20</span>
S = 0
FOR k = 5 TO 23
s = s + (2 * k + 3) / (3 * k + 2)
NEXT k
s = 3 + 2 * s
PRINT s
END
Если Вам нужна программа то Microsoft Pover Point.