Вычисление значения функции

[Е.катерина]

1задача.Ввести x и вычислить:


(5(в степени x) - ctgx,если x<0
y= (1 ,если x=0
(2cos2x ,если x>0

2задача.Ввести x и вычислить:

( 2|x+1| ,если x<0
y= (0 .если x=0
( lg|x+1| .если x>0

[samec2011]

2задача.Ввести x и вычислить:

( 2|x+1| ,если x<0
y= (0 .если x=0
( lg|x+1| .если x>0

Код: Выделить всё

var x,y:real;
begin
write('x> '); readln(x);
if (x<0) then
 y:=2*abs(x+1)
else 
 if (x=0) then
  y=0
 else
  y=lg(abs(x+1));
write('y= '); readln(y:8:4);
end.

первая аналогично.

[Е.катерина]

а можно ещё первую,просто я даже по аналогие не понимаю...

[samec2011]

рублей за 50, всё можно.... Стучите в асю 11один11-5шесть5шесть, обсудим.

[Хыиуду]

Пользователь Е.катерина, получает устное предупреждение за некорректное название темы.
5 в степени х вычисляется как exp(x*ln(5));