Цитата:
Сообщение от макс122
Задание1.F=Ln(18+Ln(16+Ln(14+...+Ln(4+Ln(2))))).
|
Код:
Var
a,S:real;
i:integer;
Begin
S:=4+Ln(2);
a:=4;
For i:=1 to 7 do
begin
a:=a+2;
S:=Ln(a+Ln(S));
end;
Writeln('Result = ',S:0:5);
Readln;
End.
Со вторым заданием - ни хрена в формулировке не понял и что это за "метод промежуточного аргумента", извините, не в курсе.