Program P_1; Var x,y,z: integer; begin x:=5; y:=5; z:=x+y; writeln(z); end. изменить программу так,...

Program P_1; Var x,y,z: integer; begin x:=5; y:=5; z:=x*y; writeln(z); end.

Program P_1; Var x,y,z: integer; begin x:=5; y:=5; z:=x*y; writeln(z); end.

Чтобы изменить программу так, чтобы она вычисляла произведение чисел x и y, нужно внести изменения в строку, где происходит вычисление значения переменной z. Вместо сложения значений переменных x и y, нужно использовать операцию умножения. Таким образом, значение переменной z будет равно произведению x и y.

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

Program P_1;
Var 
  x, y, z: integer;
begin
  x := 5;
  y := 5;
  z := x * y;  // Изменение операции сложения на умножение
  writeln(z);
end.

В этой программе:

1. Объявляются три переменные x, y и z типа integer.
2. Переменной x присваивается значение 5.
3. Переменной y присваивается значение 5.
4. Переменной z присваивается значение произведения значений переменных x и y, то есть z := x * y;.
5. Используется функция writeln для вывода значения переменной z на экран.

Таким образом, после выполнения этой программы на экране будет выведено значение произведения 5 * 5, то есть 25.