program funct;
var
y, x : integer;
Begin
write('y = ');
readln(y);
write('x = ');
readln(x);
writeln('z=y*x');
writeln('z=', y, '*', x);
writeln('z=', y*x);
end.
Объяснение:
PascalABC.NET
Пример работы:
