Регистрация
Войти
Стать экспертом Правила
Информатика

Дам 30 поинтов!!!Напишите программу, позволяющую вычислить значение функции

ОТВЕТЫ
Var
x:real;
Begin
Write('x = ');ReadLn(x);
if x>-3 then WriteLn('y = ',1/(x*x+1))
else WriteLn('y = 9')
End.
511
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам