Регистрация
Lukasheva1928
05.03.2022 15:32
Информатика
Есть ответ 👍

Сколько страниц будет найдено по запросу фрегат и эсминец

116
275
Посмотреть ответы 1

Ответы на вопрос:

molodoy3
molodoy3
4,6(99 оценок)
Const   n = 5; var   a: array[1..n, 1..n] of integer;   i, j, m, nmax, nmin, jmax, jmin: integer; begin   randomize;   writeln('исходный массив');   for i : = 1 to n do   begin       nmax : = -100;       nmin : = 100;       for j : = 1 to n do       begin           a[i, j] : = random(24) - 8;           if nmax < a[i, j] then           begin               nmax : = a[i, j];               jmax : = j           end;           if nmin > a[i, j] then           begin               nmin : = a[i, j];               jmin : = j           end;           write(a[i, j]: 4)       end;       writeln;       a[i, jmax] : = nmin;       a[i, jmin] : = nmax   end;   writeln(#13#10, 'результирующий массив');   for i : = 1 to n do   begin       for j : = 1 to n do write(a[i, j]: 4);       writeln   end end. тестовое решение: исходный массив   -4    8    3    7    5   -7  -7    1    8    0   14    0    0    1  -1   14    7  -5  -1  14     7    6    1  -6  14 результирующий массив     8  -4    3    7    5     8  -7    1  -7    0   -1    0    0    1  14   -5    7  14  -1  14     7    6    1  14  -6

Популярно: Информатика