Помогите написать программу на паскаль.

Ввести число и вывести строку - описание этого числа "Отрицательные число", "Положительное число", "Нулевое число".

Question

Информатика

Радий

23 апреля, 16:52

Помогите написать программу на паскаль.

Ввести число и вывести строку - описание этого числа "Отрицательные число", "Положительное число", "Нулевое число".

+2

Ответы (2)

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

Валентиныч · Answer 1

Var a:integer; beginWriteln ('Введите число') ; Read (a) ; if a<0 then Writeln ('Отрицательное число') elseif a=0 then writeln ('Нулевое') else writeln ('Положительное') ; End.

Козьмич · Answer 2

Var

a:integer;

begin

read (a) ;

if a > 0 then writeln ('Положительное число') else if a < 0 then writeln ('Отрицательное число') else writeln ('Нулевое число') ;

end.

Помогите написать программу на паскаль.Ввести число и вывести строку - описание этого числа "Отрицательные число", "Положительное число", "Нулевое число".

Помогите написать программу на паскаль.

Ввести число и вывести строку - описание этого числа "Отрицательные число", "Положительное число", "Нулевое число".