Ответы
Ответ дал:
2
Var
x:integer;
y:real;
Begin
Write('x = ');
ReadLn(x);
if x = 9 then WriteLn('Ошибка: на ноль делить нельзя!')
else
Begin
y:= Sqrt(Exp(x*x+2)); // Выражение упростилось, т.к. положительное число е(2,71828...), всегда возводится в положительную степень (x^2 +2 > 0, при любом x)
WriteLn('f(',x,') = ',y);
End;
End.
x:integer;
y:real;
Begin
Write('x = ');
ReadLn(x);
if x = 9 then WriteLn('Ошибка: на ноль делить нельзя!')
else
Begin
y:= Sqrt(Exp(x*x+2)); // Выражение упростилось, т.к. положительное число е(2,71828...), всегда возводится в положительную степень (x^2 +2 > 0, при любом x)
WriteLn('f(',x,') = ',y);
End;
End.
Вас заинтересует
5 месяцев назад
5 месяцев назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад