Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
nad0210
0 / 0 / 0
Регистрация: 10.01.2012
Сообщений: 3
1

В каждой строке найти min элемент и поместить его на главную диагональ

13.01.2012, 15:07. Просмотров 458. Ответов 2
Метки нет (Все метки)

Задача:
Дан массив n*n
В каждой строке найти min элемент и поместить его на главную диагональ.
Проблема:
Как поместить на главную диагональ?
И правильно составлена программа?
Заранее благодарю)
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
CLS
INPUT "VVOD ZNACHENIYA ", N
DIM A(N, N)
RANDOMIZE TIMER
FOR I = 1 TO N
FOR J = 1 TO N
A(I, J) = INT(RND * 100 - 10)
NEXT
NEXT
PRINT "MATRICA"
FOR I = 1 TO N
FOR J = 1 TO N
PRINT A(I, J);
NEXT
PRINT
NEXT
PRINT "MIN V KASHDOY STROKE"
FOR I = 1 TO N
MIN = 1E+10
FOR J = 1 TO N
IF A(I, J) < MIN THEN MIN = A(I, J)
NEXT
PRINT MIN
NEXT
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.01.2012, 15:07
Ответы с готовыми решениями:

В матрице найти минимальный элемент и поставить его на главную диагональ
в матрице N*M найти минимальный элемент ,поставить его на главную диагональ, на...

Как найти в каждой строке матрицы C минимальный элемент и поменять его местами с последним элементом строки
Найти в каждой строке матрицы C(n, m) минимальный элемент и поменять его...

В квадратной матрице найти сумму и Min по каждой строке
В квадратной матрице найти сумму и Min по каждой строке в QBasic

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

В массиве А состоящем из N элементов, найти элемент, для которого [A(I) – MAX] = MIN и определить его индекс
Помогите пожалуйста решить) В массиве А состоящем из N элементов, найти ...

2
Фаер
640 / 369 / 259
Регистрация: 09.12.2011
Сообщений: 733
Записей в блоге: 35
13.01.2012, 15:37 2
В принципе, решение верное, только не законченное. Вот:
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
cls: x=1
randomize timer
input "n=";n
dim A(n,n)
 
for i=1 to n
  min=20
for j=1 to n
  A(i,j)=int(rnd*41-20): print using "### "; A(i,j);
  if A(i,j)<min then min=A(i,j): y=i: z=j' находим мин. в строке
next j
  swap A(y,z),A(x,x): x=x+1' swap-обменять значения переменных
  print :
next i
 
color 2
for i=1 to n
for j=1 to n
  print using "### ";A(i,j);
next j
print :
next i
end
1
nad0210
0 / 0 / 0
Регистрация: 10.01.2012
Сообщений: 3
13.01.2012, 15:45  [ТС] 3
спасибо большое)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.01.2012, 15:45

Дан двумерный массив . Найти максимальный элемент в каждой строке
1 . Дан одномерный массив . Упорядочить его по возрастанию 2 . Дан одномерный...

В каждой строке матрицы найти наибольший элемент, затем получить их сумму
дан массив 1004 0230 2003 0140 Задание: полученный массив напечатать.В...

Найти среднее всех элементов, определить min элемент и построить его индекс, построить новый массив
Помогите к завтрашнему дню нужно сделать:( в массиве из n элементов найти...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru