Решение уравнения, подскажите чего не хватает - Pascal ABC

Формулировка задачи:

var
 
y,x: real;
 
begin
 
 x:=34.211;
 
Writeln (y=1 / (exp(2 * ln(10)))*x+(cos(x+1)/exp(ln(x)*(1/3))));
 
Writeln ('y=',y)  
    
end.

Решение задачи: «Решение уравнения, подскажите чего не хватает»

textual
                            Листинг программы 
                        
                            y:=1 / (exp(2 * ln(10)))*x+(cos(x+1)/exp(ln(x)*(1/3)));
Writeln ('y=',y)

Оцени полезность:

9 голосов , оценка 4.222 из 5

Похожие ответы