napisać program (we free pascalu) ktory 10 razy wczyta liczbe od uzytkownika i okresli jej znak ( czy jest to dodatnia lub ujemna)

napisać program (we free pascalu) ktory 10 razy wczyta liczbe od uzytkownika i okresli jej znak ( czy jest to dodatnia lub ujemna)