Турбо бэйсик

[FantoMasel]

Помогите написать программу в турбо бэйсике)

Дана матрица N*M упорядочить строки по возрастанию максимальных элементов в них.

Помогите, очень надо для зачёта

[Arigato]

Готов помочь. Давайте свои наработки, посмотрим, что там не так.

[FantoMasel]

Cls
Input n
Dim A(n,m)
For I=1 to n
For j=1 to m
Input a(I,j)
Next J,I
For I=1 to n
Ror j=1 to m
Print a(I,j)
Next j
Print
Next I

А что дальше писать не могу понять помогите

[Arigato]

После Next J,I вписываете само решение задачи.
Решить можно таким образом:
1. Находим максимальный элемент матрицы, запоминаем номер строки, где встретился этот элемент.
2. Меняем эту строку с последней.
3. Исключаем последнюю строку из рассмотрения (т.е. считаем, что у нас на 1 строку в матрице меньше). Повторяем, начиная с 1-го шага.
4. Как только в матрице останется только 1 не рассмотренная строка, завершаем цикл.

[FantoMasel]

Как узнать что в матрице осталось одна строка?
Как меня строки?
И как узнать номер строки максимального элемента?

[Arigato]

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

Как узнать что в матрице осталось одна строка?

Цикл организуйте, от n до 1, по убыванию. Метод сортировки по типу метода Пузырька.

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

Как меня строки?

Менять поочередно соответствующие элементы строк. Для замены можно использовать промежуточную переменную.

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

И как узнать номер строки максимального элемента?

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

[FantoMasel]

Расскажи про метод пузыря, впервые слышу
Еще не знаю как поиск записывается

[FantoMasel]

Как исключить последнюю строку из рассмотрения?

[Arigato]

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

Расскажи про метод пузыря, впервые слышу

http://ru.wikipedia.org/wiki/%D0%A1%...BA%D0%BE%D0%BC