Дано условие. Введите целое число с клавиатуры.Если это число больше 0,то программа должна выполнить действие «Это число отрицательное»,иначе «Это число положительное».Составьте программный код. Помогите пожалуйста 8 и 9.
Program n9; var a: integer; begin writeln('Введите целое число: '); readln(a); if ((a mod 2)=0)then writeln('Это число положительное' ) else writeln('Это число отрицательно' ) end.
