Из каждой строки матрицы определить числа, которых нет в следующей строке, и записать их в одномерный массив - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

доброго времени суток! помогите найти ошибку в задаче. Задача:Создать матрицу B[1..N,1..M] из целых чисел. Из каждой строки матрицы определить числа, которых нет в следующей строке и записать их в одномерный массив.
выводит число только по предпоследней строчке последнего столбца.

Решение задачи: «Из каждой строки матрицы определить числа, которых нет в следующей строке, и записать их в одномерный массив»

textual
Листинг программы
program v;
const M = 3;
      N = 3;
var b: array[1..N,1..M] of integer;
    i, j, p, c,q: integer;
    x: array[1..N*M] of integer;
    isExist: boolean;
begin
for i := 1 to N do
for j := 1 to M do
read (b[i,j]);
for i := 1 to N do
 begin
  for j := 1 to M do
  write (b[i,j]:5);
  writeln
 end;
readln;
c := 0;
for i:=1 to N-1 do
for j:=1 to M do
 begin
  p:=b[i,j];
  isExist := false;
  for q:=1 to N do
  if p = b[i + 1, q] then
   begin
    isExist := true;
    break;
   end;
 if not isExist then
  begin
   c := c + 1;
   x[c] := p;
  end;
 end;
if c=0 then write('Искомых элементоа нет')
else
 begin
  writeln('Искомый массив');
  for i:=1 to c do
  write(x[i]:5);
 end;
readln
end.

Объяснение кода листинга программы

В данном коде происходит следующее:

  1. Создается программа v.
  2. Задаются константы M и N, которые определяют размер матрицы.
  3. Создается переменная b типа array[1..N,1..M] of integer, которая будет представлять матрицу.
  4. Создаются переменные i, j, p, c и q, которые будут использоваться для чтения и записи значений в матрицу.
  5. Числа из каждой строки матрицы записываются в массив x.
  6. Переменная c инициализируется нулем, так как изначально предполагается, что искомого элемента нет в матрице.
  7. В цикле происходит проверка наличия искомого элемента в матрице. Если его нет, то значение элемента записывается в массив x и переменная c увеличивается на единицу.
  8. После завершения цикла проверяется значение переменной c. Если оно равно нулю, то выводится сообщение о том, что искомых элементов нет. В противном случае выводится массив x.
  9. Программа завершается после вывода сообщения Искомых элементоа нет или Искомый массив.

Оцени полезность:

15   голосов , оценка 4.067 из 5
Похожие ответы