Var n,i:integer;
y1,y2,yn:real;
begin
readln(n);
y1:=-2;
y2:=1;
writeln(1,' ',y1:5:3);
writeln(2,' ',y2:5:3);
for i:=3 to n do
begin
yn:=1/6*(y2+1/y1);
writeln(i,' ',yn:7:5);
y1:=y2;
y2:=yn;
end;
end.
Пример:
5
<span>1 -2.000
2 1.000
3 0.08333
4 0.18056
5 2.03009</span>
Таких можно написать очень много 4224 , 1221 ,2112, 3443, 4334
10101010 2-170 10, 121 10 - 1111001 2
В первом D9;
т.к. в среднее значение не входит С1, то среднее значение запишется так: (95-С1)/6=10; отсюда С1=35
S= aв
это формула нахождения S прямоугольника