Какие изменения нужно внести в программу примера 16.1 чтобы для числа рассматривались три случая : 'положительное' ,'отрицательное' ,'равно нулю'.

var x:integer;

Begin

write ('Введите х='); readln(x);

if x>0 then

 write('Положительное')

else

 write('Отрицательное');

if x=0 then write('равно нулю')

end.

ну просто добавить еще одно условие. Ну можно еще условие в условие добавить, а как еще хз.