10. Составить программу, осуществляющую ввод числовых переменных. При вводе положительного числа вывести информацию: «Число больше ноля», при вводе отрицательного числа – «Число меньше ноля», при вводе ноля – «Вы ввели ноль».
Program n1; var a: real; begin readln(a); if a>0 then write('число больше ноля') else if a<0 then write('число меньше ноля') else write('вы ввели ноль');<br>end.