Двумерный массив (10x10 найти максимум в каждой строке и минимум в каждом столбце.

Const
   N = 10;
Var
   A:array[1..N,1..N] of integer;
   i,j,M:integer;
Begin
Randomize;
For i:= 1 to N do
    Begin
    M:=1;
    For j:= 1 to N do
        Begin
        A[i,j]:=random(21)-10;
        Write(A[i,j]:3,' ');
        if A[i,M]<A[i,j] then M:=j;
        End;
    WriteLn(' Max = ',A[i,M]);
    End;
WriteLn('Минимумы:');
For j:= 1 to N do
    Begin
    M:=1;
    For i:= 1 to N do
        if A[i,j]<A[M,j] then M:=i;
    Write(A[M,j]:3,' ');
    End;
End.

Объяснение:

Алгоритм-конечная совокупность точно заданных правил решения некоторого класса задач или габор инструкций,описывающих порядок действий исполнителя для решений определенной задачи.

Алгорим это конечный габори правил который определяет последовательность операций для решений конкретного множества задач и обладает пятью важными чертами:конечностями,определенность,ввод,вывод,эффективность

Циклический,генетический разветдчющийся.

Утром надо вставать почистить зубы застелить кровать и позавтракать а потом пойти в школу.

Меняется порядок действий в алгоритме.

Сори прости что смог ч только га вопросы оьветил

1. почистить изнутри 2. если есть непригодные детали заменить 3. по надобности можешь повысить оперативы, но нужно, чтобы планки памяти были одинаковые! 4 по надобности можешь добавить ssd памяти, поставив новый диск, но он должен быть такой же как и старый. если вирус снеси винду и через флэшку и биос поставь новую, предварительно кинуть на другую флэшку нужную информацию.

p.s по моим подщетам на почистить детали-530руб. оператива kingston 8гб 2 штуки 290$ ssd память терабайт-299$, флэшка или диск с виндоус 10 pro version с полной поддержкой-125$ итого: 43370руб. это примерная цена, я заходил месяц назад на магазин и это без доп деталей! в $: 722,83$