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

для произвольного значения x найти

ОТВЕТЫ
var x,z:real;
Begin
write('x = ');
readln(x);
if x<0
 then z:=x/3
 else z:=2+sqrt(x*x*x);
writeln('z = ',z);
End.

Пример:
x = -18
z = -6
196
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам