Двумерный массив, замена элементов |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Двумерный массив, замена элементов |
Gость |
Сообщение
#1
|
Гость |
Подскажите пожалста как поменять местами 2 элемента двумерного массива
|
guest |
Сообщение
#2
|
Гость |
можно вот так (в примере целочисленного массива для 2 строк и двух столбцов)
но некрасиво Код var ar: array[1..2,1..2] of integer; var i,j: byte; var m,n,m2,n2,b,b2:integer; begin for i:=1 to 2 do begin for j:=1 to 2 do read(ar[i,j]); end; write('введите номера строк и столбцов елементов, которые нужно поменять местами'); read(m,n,m2,n2); b:=ar[m,n]; b2:=ar[m2,n2]: ar[m,n]:=b2; ar[m2,n2]:=b; for i:=1 to 2 do begin for j:=1 to 2 do writeln(ar[i,j]); end; end. |
volvo |
Сообщение
#3
|
Гость |
guest,
Цитата но некрасиво Как тогда будет красиво, не подскажешь? Очень интересно было бы посмотреть...b:=ar[m,n];Так? |
guest |
Сообщение
#4
|
Гость |
guest, Как тогда будет красиво, не подскажешь? Очень интересно было бы посмотреть... b:=ar[m,n];Так? ах, если бы я знал мой опыт программирования составляет три недели и я подумал, что за такой код гуру закидают меня камнями но как по другому я не знаю |
Гость |
Сообщение
#5
|
Гость |
|
Gость |
Сообщение
#6
|
Гость |
Всем спасибо - уже сам допёр!
|
Текстовая версия | 20.05.2024 1:08 |