Ввести число в диапазоне от 10 до 99. Определить:

а) значность числа;

б) четность числа.

Question

Информатика

Петуня

6 июня, 03:23

Ввести число в диапазоне от 10 до 99. Определить:

а) значность числа;

б) четность числа.

+5

Ответы (1)

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

Харлам · Answer 1

Var

a: integer;

begin

a : = 0;

writeln ('enter the value: ') ;

read (a) ;

if a < 0 then

write ('negative')

else

write ('positive') ;

if a mod 2 = 0 then

write (' even')

else

write (' odd') ;

end.

Ввести число в диапазоне от 10 до 99. Определить:а) значность числа;б) четность числа.

Ввести число в диапазоне от 10 до 99. Определить:

а) значность числа;

б) четность числа.