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

Пожалуйста посчитайте решить приз....

ОТВЕТЫ
var
x,y:real;

begin
readln(x);
if x>=5 then y:=sqr(x)+2
else y:=1-cos(x);
writeln(y);
end.
498
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам