Тurbo pascal. матрица

[pedro1208]

Задана матрица А(МхМ) . Переместить все её элементы, за исключением максимального и минимального в каждой строке, в матрицу В.

нужно составить блок схему ато я запутался.

[hon]

Какой язык? Где свои наработки? В чем конкретно проблема?

[pedro1208]

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

[hon]

1. Копируем полностью массив A в массив B.
2. Ищем минимальный и максимальный элемент и заменяем на 0 (например).
3. Выбросить пустые столбцы.

var abc:integer;
.....
for y:=0 to M do
    begin
    for x:=0 to M do
        abc:=abc+[x,y]
    if abc=0 then {выбрасываем столбец}
    abc:=0;
    end;
.....

Что значит выбросить? Его нужно будет отобразить, записать в файл? Что?

[pedro1208]

выбросить в смысле не писать вообще

[Serge_Bliznykov]

ну так не пишите в новый массив исключаемые значения.
в чём проблема то?

Учтите, что строго говоря, минимальных (как и максимальных) в каждой строке может быть несколько. В условии про это ничего не сказано. Поэтому Вам придётся решить - что делать в таком случае.

[hon]

Сообщение от pedro1208

выбросить в смысле не писать вообще

Куда не писать? В файл, на экран?

Выложите свои наработки, скажите какая и где ошибка и мы вам поможем.