Задание 7
порядок входов:
B C A
Строка 3
B=1, F=1
Строка 4
B=1, A=1, F=0
Строка 7
B=1, C=1, F=1
Строка 8
B=1, C=1, A=1, F=1
Запишем формулу суммы в виде, более удобном для программирования:
var
i:integer;
x,xi,x2,s:real;
begin
Write('x = '); Read(x);
s:=0.5;
xi:=x;
x2:=x*x;
for i:=2 to 10 do begin
xi:=xi*x2;
s:=s+xi/(2*i)
end;
Writeln('S=',s)
end.
<u>Пример</u>x = 3.62
S=2254030236.00533
<em>Во вложении приведено контрольное решение</em>
Var a,s: real;
begin
write('длина стороны: ');
readln(a);
s:=a*a*sin(pi/3)/2;
writeln('площадь треугольника = ',s:6:4);
end.
<span>
</span>
Ну я думаю иконка, но честно говоря вопрос странный