Дано число, дать характеристику числа:а) положительное или отрицательноеб)четное или...

Question

Дано число, дать характеристику числа:
а) положительное или отрицательное
б)четное или нечетное

Comments

а где число?

---

просто дано число, какое неизвестно

---

Вопрос, какой язык?

Answer 1

Если Pascal, то вот:

Program z1;
var a:integer;
begin
Write('Введите число: '); read(a);
if (a>0) then Writeln('Данное число положительное')
else Writeln('Данное число отрицательное');
if (a mod 2=0) then Writeln('Данное число чётное')
else Writeln('Данное число нечётное');
end.