Дано число, дать характеристику числа:

а) положительное или отрицательное

б) четное или нечетное

Question

Информатика

Святослав

24 сентября, 12:35

Дано число, дать характеристику числа:

а) положительное или отрицательное

б) четное или нечетное

+5

Ответы (1)

Знаете ответ на вопрос?

Рим · 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.

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

Дано число, дать характеристику числа:

а) положительное или отрицательное

б) четное или нечетное