Question

Помогите ПАСКАЛЬ!!
Мне нужно составить программу определяющую являетьли ли число а положительным

Answer 1

program Usloviya;
var a:integer;
begin
readln (a);
if (a>0) then write('Число положительное') ;
end.