<em>// PascalABC.NET 3.3, сборка 1547 от 07.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('n=');
var x:=ReadReal('x=');
Writeln(SeqGen(n,i->Power(x,2*i+1)/(2*i+1)).Sum)
end.
<u>Пример</u>
n= 9
x= 2.5
418654.338245567
Var q,i,s:integer;
begin
readln(q);
s:=0;
i:=0;
while s<q do
begin
i:=i+1;
s:=s+i;
end;
if s=q then writeln('Страница = ',i+1)
else writeln('Ошибка ввода');
end.
Пример:
5
<span>Страница = 6</span>
Если вы про имя, то у меня любое
хоть и такое:
<span>\ ⁄ ? : * " > < |
ОС: Linux
получается создать файл с \
если у кого стоит бубунту, то не нужно тут причитать, мол файл такой невозможен
максимальная длина - </span><span>???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
Дистрибутив: Mageia</span>
1 не знаю
2)
байт
КиБ
3)
, 8 бит в символе
символов всего
бит в тексте
байт = 10,25 КиБ
4)
символов всего
, 6 бит/символ
бит = 1875 байт = 1,8 КиБ
5)
КиБ
, т.е. 4 дискеты:)