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

1
а где число?
просто дано число, какое неизвестно
Вопрос, какой язык?

Ответы и объяснения

Лучший Ответ!
2014-04-03T13:06:55+04:00
Если 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.