Составить программу, осуществляющую ввод числовых переменных. при вводе положительного числа вывести информацию: «число больше ноля», при вводе отрицательного числа – «число меньше ноля», при вводе ноля – «вы ввели ноль».

Var
a: integer;
begin
read(a);
if a > 0 then write('положительное');
if a = 0 then write('ноль');
if a < 0 then write('отрицательное');
end.