Составьте программу нахождения значение функции z = y*x. Нужна программа в паскаль нужно

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

PascalABC.NETbegin var (x,y) := ReadInteger2('Введите x и y:'); Print('z =', y*x) end.

Пример работы: