Написать ** Паскале программу, выводящую ** экран -1, если введённое число X...

Question

Написать на Паскале программу, выводящую на экран -1, если введённое число X отрицательное, 0 – если число X=0, 1, если число X положительное.

Answer 1

===== PascalABc.NET =====

begin

   Sign(ReadReal).Print

end.

Comments

Вводить можно и нецелые

---

спасибо

---

Достаточно было просто кликнуть сердечко)