Program AddNums(output);
    var x,y,z,result:integer;
    begin
writeln('Введите три целых числа');
readln(x,y,z);
result:= x*y*z;
writeln('Произведение чисел:',result);
end.