Предмет: Информатика,
автор: day17
решить в Free Pascal
Приложения:
Ответы
Автор ответа:
0
Держи! Код на изображении :)
Приложения:
Автор ответа:
0
В языке Free Pascal НЕТ фукции Power !!!
Автор ответа:
0
Как бы суть, насколько я её понимаю в том, что ответ должен даваться в соответствии с условиями задания. Следовательно, в данном случае, Ваш код должен без всяких танцев с бубном загружаться и выполняться в среде Free Pascal.
Автор ответа:
0
var
x: real;
begin
Write('Введите значение аргумента, не равное нулю: '); Readln(x);
if x = 0 then Writeln('Нулевой аргумент недопустим!')
else Writeln(sqr(x) * abs(1 - x) - 7 / (sqr(x) - 15))
end.
Тестовое решение:
Введите значение аргумента, не равное нулю: 24.35
13844.7282626493
Приложения:
Похожие вопросы
Предмет: МХК,
автор: pobeditel007
Предмет: Математика,
автор: Аноним
Предмет: Другие предметы,
автор: Аноним
Предмет: Обществознание,
автор: alina1726