Question

Вводится число. Если оно положительное, то удвоить его. Иначе - уменьшить на 10. Ответ вывести с такими фразами « Вы ввели число ……Оно положительное. Результат обработки…» или « Вы ввели число ……Оно отрицательное. Результат обработки…»
Составить программу в кумире.

Answer 1

program pr1;

var z,x,v: integer;

begin

writeln('Ведите число');

readln(z);

if z>=0 then x:=z*2 and wreteln(z' Оно отрицательно ' x);

if z<0 then v:=z-10 and wreteln (z ' Оно положительно ' v );

end.