Составить программку для вычисления значения функцииy=(-1,если xamp;lt;-1 x,если

Составить программку для вычисления значения функции
y=(-1,если xlt;-1
x,если xgt;-1
1,если x=-1)
Помогите !!! Безотлагательно необходимо.

Задать свой вопрос
2 ответа
Var x,y:real;
begin
write('x = ');
readln(x);
if xlt;-1 then y:=-1
  else if xgt;-1 then y:=x else y:=1;
writeln('y = ',y);
end.

Пример:
x = -1
y = 1
Var x:real;
Begin
Write('x = ');ReadLn(x);
if xlt;-1 then Write('y = ',-1)
   else if xgt;-1 then Write('y = ',x)
        else Write('y = ',1)
End.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт