Задано вещественное значение аргумента х. Вычислить значение

функции у. y = eх+1

+ Cos x

Написать решение

программы на языке Pascal

Question

Поляха

11 марта, 21:38

+2

Ответы (1)

Знаете ответ?

Феликс · Answer 1

Var x, y:real;

begin

readln (x) ;

y:=exp (x+1) + Cos (x) ;

writeln ('y=', y) ;

end.

Задано вещественное значение аргумента х. Вычислить значениефункции у. y = eх+1+ Cos xНаписать решениепрограммы на языке Pascal