Решите ребусы: аист+аист+аист+аист+аист=стая

1354+1354+1354+1354=5416

// pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! begin var (n,m): = readinteger2('n, m -> '); var a: = matrrandom(m,n); writeln('исходная матрица: '); a.println; dec(n); dec(m); for var i: = 0 to m do begin   swap(a[i, a.row(i).indexmin],a[i, n]);   swap(a[i, a.row(i).indexmax],a[i, 0]); end; writeln('конечная матрица: '); a.print end. пример: n, m ->   4 5 исходная матрица:   95  62  11  82   91  98  80    6   21  73  62  70   36  25  89  22   44  42  80  65 конечная матрица:   95  62  82  11   98  91  80    6   73  70  62  21   89  25  36  22   80  65  44  42

Входные данные: 147*(5) и так, я предлагаю посмотреть сколько "5" удаляется за 1 раз ```````````````````````````````````````````````````````````````` пока нашлось (5555) или нашлось (3333) если нашлось (5555) то заменить (5555, 3) иначе заменить (3333, 5) конец если ````````````````````````````````````````````````````````````````5555 -->   3уходит четыре "5".147 / 4 = 36 (3)36 раз у нас "5555" заменится на "3", и останется еще три "5".наша строка: (36*(3) + 555) теперь"3333" > 536 / 4 = 9 (0)9 раз "3333" заменим на "5", получаем9*(5) + 555 = 12*(5)"5555" --> 312 / 4 = 3(0)3 раза "5555" заменим на "3"333конец.ответ: 333