Помогите решить в паскале 13 задание

Помогите решить в паскале 13 задание
Гость
Ответ(ы) на вопрос:
Гость
//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
Не нашли ответ?
Ответить на вопрос
Похожие вопросы