Клушин 24 октября 2019 в 08:20
Где ошибка и как правильно записать?
Где ошибка и как правильно записать?
Var x,y:real;
begin
write(x = );
readln(x);
if xlt;0
then y:=exp(x)+sin(sqrt(x*x+1))/cos(sqrt(x*x+1))
else y:=x*x+4*cos(x);
writeln(y = ,y:5:2);
end.
Пример 1:
x = -0.5
y = 2.66
Пример 2:
x = 3.8
y = 11.28
begin
write(x = );
readln(x);
if xlt;0
then y:=exp(x)+sin(sqrt(x*x+1))/cos(sqrt(x*x+1))
else y:=x*x+4*cos(x);
writeln(y = ,y:5:2);
end.
Пример 1:
x = -0.5
y = 2.66
Пример 2:
x = 3.8
y = 11.28
Компьютеры и вычисления
30
47
Для комментирования необходимо зарегистрироваться на сайте