Question

ПОМОГИТЕ ПОЖАЛУЙСТА!!!
PascalABC
В математике функция sign(x) (знак числа) определена так:
sign(x) = 1, если x > 0,
sign(x) = -1, если x < 0,
sign(x) = 0, если x = 0.

Для данного числа x выведите значение sign(x).

Входные данные
Вводится одно целое число.

Выходные данные
Выведите ответ на задачу.

Примечание
Эту задачу желательно решить с использованием каскадных инструкций if... elif... else.

Примеры
входные данные
3
выходные данные
1

Answer 1

Ответ:

var x:integer;

begin

 read(x);

 if (x=0) then

   write('sign(x) = 0')

 else if (x>0) then

   write('sign(x) = 1')

 else if (x<0) then

   write('sign(x) = -1');

end.

Объяснение: