Дана программа на языке Паскаль:

program a3;

var x, y, z: real;

begin

writeln (' Введите три числа');

readln (x, y, z);

if (x<=y) and (y<=z) then begin x:=2*x y:=2*y; z:= 2*z

end

else

begin

x:= abs(x) y:= abs(y) z:= abs(z)

end

writeln( x, ' ', y, ' ', z)

end

Составьте блок-схему, соответствующую программе.

Что является результатом работы программы?

Блок схема приведена в приложенном файле.

Результатом работы программы является вывод на экран:

-если x<= y И y<=z, то выводим значения произведений 2*x, 2*y, 2*z

-иначе выводим модули значений переменых x, y, z.