Question

Если введенное число отрицательное, то увеличьте его в 4 раза.
Паскаль.
умоляю помогите...

Answer 1

var a: integer;

begin

readln(a);

if (a < 0) then

a := a * 4;

writeln(a);

end.

Надеюсь, что помог.