Написать программу в паскале, найти сумму двух матриц

Чтобы написать программу на Паскале для сложения двух матриц, вам понадобится создать два двумерных массива (матрицы) одинакового размера. Затем вы будете проходиться по каждому элементу обеих матриц и складывать их значения, помещая результат в новую матрицу, которая будет содержать сумму исходных матриц.

Вот примерный шаблон программы на Паскале для сложения двух матриц:

program SumOfMatrices;
const
  n = 3; // Размер матриц
var
  A, B, C: array[1..n, 1..n] of integer; // Объявление матриц A,B и C
  i, j: integer;
begin
  // Ввод значений в матрицу A и B (можно также сделать ввод с клавиатуры)
  // Например:
  A[1, 1] := 1; A[1, 2] := 2; A[1, 3] := 3;
  A[2, 1] := 4; A[2, 2] := 5; A[2, 3] := 6;
  A[3, 1] := 7; A[3, 2] := 8; A[3, 3] := 9;
  
  B[1, 1] := 9; B[1, 2] := 8; B[1, 3] := 7;
  B[2, 1] := 6; B[2, 2] := 5; B[2, 3] := 4;
  B[3, 1] := 3; B[3, 2] := 2; B[3, 3] := 1;

  // Сложение матриц
  for i := 1 to n do
  begin
    for j := 1 to n do
    begin
      C[i, j] := A[i, j] + B[i, j];
    end;
  end;
  
  // Вывод суммы матриц
  for i := 1 to n do
  begin
    for j := 1 to n do
    begin
      write(C[i, j], ' ');
    end;
    writeln;
  end;
end.

Такая программа складывает две матрицы размером 3x3 и выводит результат в виде новой матрицы. Вы можете изменить размеры матриц и их элементы по вашему усмотрению.