Вводится число. Если оно положительное, то удвоить его. Иначе - уменьшить ** 10. Ответ...

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 );</p>

end.

Comments

неправильно, там вообще должна быть одна переменная)))))