Ответ(ы) на вопрос:
//PascalABC.NET 3.2 сборка 1318
Var
x:real;
begin
readln(x);
if x>3 then writeln(-3*x+9) else writeln(power(x,3)/(sqr(x)+8));
end.
Пример ввода:
-1
Пример вывода:
-0.111111111111111
Не нашли ответ?
Похожие вопросы