Question

Заданы значения переменных z,y,x. Составьте программу, с помощью которой найдите произведение модулей этих чисел

Answer 1

program proiz_mod_3;

var

z,y,x:integer;

begin

read(z,y,x);

write(abs(z)*abs(y)*abs(x))

end.