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

Конечно, вот пример программы на языке Pascal, который выводит две матрицы в виде таблиц и находит их сумму:

program SumOfMatrices;

const
  ROWS = 3;
  COLS = 3;

type
  Matrix = array [1..ROWS, 1..COLS] of integer;

var
  A, B, Sum: Matrix;
  i, j: integer;

begin
  // Заполнение матрицы A
  writeln('Матрица A:');
  for i := 1 to ROWS do
  begin
    for j := 1 to COLS do
    begin
      A[i, j] := i + j; // Пример заполнения, замените значения по вашему усмотрению
      write(A[i, j]:4);
    end;
    writeln;
  end;

  // Заполнение матрицы B
  writeln('Матрица B:');
  for i := 1 to ROWS do
  begin
    for j := 1 to COLS do
    begin
      B[i, j] := i * j; // Пример заполнения, замените значения по вашему усмотрению
      write(B[i, j]:4);
    end;
    writeln;
  end;

  // Нахождение суммы матриц
  writeln('Сумма матриц A и B:');
  for i := 1 to ROWS do
  begin
    for j := 1 to COLS do
    begin
      Sum[i, j] := A[i, j] + B[i, j];
      write(Sum[i, j]:4);
    end;
    writeln;
  end;
end.

Этот пример программы создает две матрицы, выводит их на экран в виде таблиц и находит сумму элементов каждой матрицы. Вы можете изменить значения в матрицах A и B, как вам угодно, для практики. Надеюсь, это будет полезно для вашей подготовки к экзаменам!