<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
(SeqGen(ReadInteger,i->1/(10*(i+1)+2)).Sum+1).Println
end.
<u>Пример</u>
10
1.26596470171236
<em>// PascalABC.NET 3.2, сборка 1363 от 17.12.2016</em><em>// Внимание! Если программа не работает, обновите версию!</em>begin
var x:=ReadReal('x=');
var y:=(x*x-7*x+10)/(x*x-8*x+12)+power(x,0.8);
Writeln('y=',y)
end.
Найдите десятичный код чисел : 1001,1000,1011,110,1100,111,10,11,1010,100,101. Заранее спасибо!!
ZilotSS [589]
1001 = 9
1000 = 8
110 =6
1100 = 12
111 = 7
10 = 2
11 = 3
1010 = 10
100 = 4
101 = 5
страниц от 1 до 9 - это 9, затем 10-я и 11 страницы ещё 4 цифры. всего 13