0 / 0 / 0
Регистрация: 03.03.2010
Сообщений: 26
1

В двумерном массиве, с одинаковым количеством столбцов и строк, поменять местами элементы, расположенные симметрично относительно главной диагонали

20.05.2010, 00:29. Показов 1200. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
В двумерном массиве, который имеет одинаковое количество столбцов и строк, поменять местами элементы, расположенные симметрично относительно главной диагонали.

спасибо)
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.05.2010, 00:29
Ответы с готовыми решениями:

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

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

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

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

2
33 / 33 / 12
Регистрация: 18.05.2010
Сообщений: 99
20.05.2010, 01:07 2
Лучший ответ Сообщение было отмечено dibar как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
program Matrix;
 
var
   a : array[1..5,1..5] of integer;
 
procedure fill;
var
   i, j : byte;
begin
     for i:=1 to 5 do
         for j:=1 to 5 do
             a[i,j] := random(10);
end;
 
procedure swap;
var
   i, j : byte;
   tmp : integer;
begin
     for i := 1 to 5 do begin
         for j := 1 to i do begin
             tmp := a[i,j];
             a[i,j] := a[j,i];
             a[j,i] := tmp;
         end;
     end;
end;
 
procedure show;
var
   i,j : byte;
begin
     WriteLn('Matrix:');
     for i := 1 to 5 do begin
         for j := 1 to 5 do begin
             Write(a[i,j]:4);
         end;
         WriteLn;
     end;
end;
 
begin
     fill;
     show;
     swap;
     show;
end.
Пожалуйста.
0
0 / 0 / 0
Регистрация: 03.03.2010
Сообщений: 26
20.05.2010, 01:18  [ТС] 3
спасибо большое)
0
20.05.2010, 01:18
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.05.2010, 01:18
Помогаю со студенческими работами здесь

В матрице целых чисел 7х7 поменять местами элементы, расположенные симметрично относительно главной диагонали.
В матрице целых чисел 7х7 поменять местами элементы, расположенные симметрично относительно главной...

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

В матрице целых чисел 7х7 поменять местами элементы, расположенные симметрично относительно главной диагонали
Помогите пожалуйста решить задачу: В матрице целых чисел 7х7 поменять местами элементы,...

Поменять местами элементы,расположенные симметрично относительно побочной диагонали
Дана матрица размером N*N.Поменять местами элементы,расположенные симметрично относительно побочной...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru