Question

Составь и запиши программу на языке Паскаль, которая, если введенное число отрицательное, меняет его на противоположное.

Answer 1

Ответ:

Program abc;

var a:integer;

begin

 Write('Введите число:');readln(a);

 if a<0 then a:=abs(a);

  Writeln(a);

end.