2^0,03421571533791295638904171153183 = 2^10 = 2^13
2^9 = 2^18,965784284662087043610958288468 = 2^21,965784284662087043610958288468
считал через логарифмы
Program Pr1;
uses crt;
var stroka,tmp:string;
i:integer;
Begin
clrscr;
readln(stroka);
for i:=1 to length(stroka) do if stroka[i]=' ' then tmp:=copy(stroka,1,i-1);
delete(stroka,1,length(tmp)+1);
stroka:=stroka+' '+tmp;
writeln(stroka);
end.
Program pr3;
const {убраны лишние описатели - чистая косметика}
a = 2.12;
b = 7.45;
h = 0.34;
var
x, f1, f2, y, s: real;
i, n: integer; {описание, необходимое для цикла}
begin
{ x := a; этот оператор не нужен }
s := 0;
n := Trunc((b - a) / h)+1; {стандартная формула числа повторений цикла }
for i := 1 to n do { Заголовок цикла }
begin {начало блока для выполнения в цикле }
x := a + (i - 1) * h; { перенесено из конца цикла }
f1 := 3 * ln(exp(1 / 5) * ln(sin(x) + sqr(x)));
f2 := ((2 * x + 1) / (x * x * x * x * x));
y := f1 / f2;
s := s + y;
end; {конец блока для выполнения в цикле }
Writeln('S=', s:10:5);
end.
Тестовое решение:
S=26390.53751
B=-5
a=2
a=11-2*2-(-5)=12
b=12/3 - 3*(-5)=19
Переменная b будет равна 19