Паскаль. Составить программу введённого пользователем числа (целое или нет; положительное, отрицательное или нуль; чётное или нечётное)

Question

Информатика

Олена

1 июня, 09:02

Паскаль. Составить программу введённого пользователем числа (целое или нет; положительное, отрицательное или нуль; чётное или нечётное)

+2

Ответы (1)

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

Сосипатра · Answer 1

var a: real;

begin

read (a) ;

if (a mod 2=0) and (a0) then write ('четное') ;

if (a mod 2=0) and (a0) then write ('не четное') ;

if a=0 then write ('нуль') ;

if a>0 then write ('положительное') ;

if a<0 then write ('отрицательное') ;

if a=0 then write ('нуль') ;

end.