Поменять местами первую и последнюю строки матрицы

@mariya) · Регистрация: 21.11.2009

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста решить задучу в QBasic
Задана матрица R(N,M). Поменять местами первую и последнюю строки. В полученной матрице найти минимальный элемент и его индекс в новой матрице.
Заранее огромное спасибо!

@кот Бегемот · 22.03.2010, 19:20

Сообщение от mariya)

Помогите пожалуйста решить задучу в QBasic
Задана матрица R(N,M). Поменять местами первую и последнюю строки. В полученной матрице найти минимальный элемент и его индекс в новой матрице.
Заранее огромное спасибо!

PureBasic

input"vvedite kol-vo strok ",n
input"vvedite kol-vo stolbcov ",m
randomize timer
print "ishodnaya matrica"
for i=1 to n
for j=1 to m
r(i,j)=int(rnd*20)
print r(i,j);
next
print
next
for j=1 to m
swap r(1,j),r(n,j)
next
minx=1
miny=1
for i=1 to n
for j=1 to m
if r(i,j)<r(minx,miny)then minx=i:miny=j
next
next
print"novaya matrica"
for i=1 to n
for j=1 to m
print r(i,j);
next
print
next
print "indeksy min elementa: stroka";minx;" stolbec";miny

@mariya) · 22.03.2010, 19:31 **[ТС]**

Спасибо огромное!!!

@mariya) 1 / 1 / 0 Регистрация: 21.11.2009 Сообщений: 12
		1
	Поменять местами первую и последнюю строки матрицы 21.03.2010, 13:31. Показов 1640. Ответов 2 Метки нет (Все метки) Помогите пожалуйста решить задучу в QBasic Задана матрица R(N,M). Поменять местами первую и последнюю строки. В полученной матрице найти минимальный элемент и его индекс в новой матрице. Заранее огромное спасибо! 0

@mariya) 1 / 1 / 0 Регистрация: 21.11.2009 Сообщений: 12
	22.03.2010, 19:31 [ТС]	3
	Спасибо огромное!!! 0

Поменять местами первую и последнюю строки матрицы

Решение