дано число. если это число положительное,то вывести что оно положительное.в противном...

Question

дано число. если это число положительное,то вывести что оно положительное.в противном случае вывести,что оно отрицательное

Comments

а если равное нулю?

---

вывести, что оно отрицательное?

---

ага

---

Но почему не рассматриваем случай, если число равно нулю??

Answer 1

Var a:integer;
begin
  readln(a);
  if a>0 then writeln('Число положительное')
    else writeln('Число отрицательное');
end.

Comments

спасииииибо большое

Answer 2

Var a: integer;
begin
readln(a);
if a>0 then
writeln('число положительное');
if a<0 then<br>writeln('число отрицательное);
end.




Что делать в случае, если число равно 0?

Comments

вывести,что отрицательное

---

тогда решение Sky09 почетный грамотей верное, а мое - нет