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

Заполнить квадратную матрицу по спирали

19.10.2009, 20:44. Показов 1536. Ответов 7
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здесь была ссылка куда-то далеко.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.10.2009, 20:44
Ответы с готовыми решениями:

Заполнить матрицу по спирали
заполнит матрицу таким образом 5 6 7 8 9 4 18 19 10 3 17 20 11 2 16 21 12 1 15 14 13 то...

Заполнить матрицу по спирали
Разработайте программу, которая заполняет двумерный массив нату-ральными числами по спирали....

Заполнить матрицу по спирали
Создать матрицу с использованием генератора случайных чисел, вывести на экран исходную матрицу и...

Получить целочисленную квадратную матрицу порядка 7 элементами которой являются числа 1, 2, ., 49 расположенные з ней по спирали
Получить целочисленную квадратную матрицу порядка 7 элементами которой являются числа 1, 2, ..., 49...

7
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
19.10.2009, 20:49 2
Shargrath, Приложите файл на форум в свою тему и нечего народ по сети гонять.
0
1 / 1 / 0
Регистрация: 18.01.2009
Сообщений: 87
19.10.2009, 21:35  [ТС] 3
Вот таким вот образом)
Миниатюры
Заполнить квадратную матрицу по спирали  
0
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
20.10.2009, 08:00 4
А что значит стрелка от 3,3 к 1,1? Вы напишите итоговую матрицу в виде таблицы, обозначая исходные ячейки так
Код
11 12 13
21 22 23
31 32 33
Посмотреть какой элемент куда уйдет.
0
32 / 32 / 19
Регистрация: 06.10.2009
Сообщений: 108
20.10.2009, 09:35 5
Действительно - непонятно что делать с элементами s[1,1] и s[3,3].

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
48
const
  n = 5; m =5;
var
 s: array[1..n,1..m] of integer;
 a,b,k,p: integer;
 
begin
 a:=0; k:=0; p:=1;
 while a<n*m do
  begin
    inc(k);
    for b:=k to m-k+1 do
     begin
       inc(a);
       s[k,b]:=p;
       inc(p);
     end;
 
  for b:=k+1 to n-k+1 do
   begin
     inc(a);
     s[b,m-k+1]:=p;
     inc(p);
   end;
 
  for b:=m-k downto k do
   begin
     inc(a);
     s[n-k+1,b]:=p;
     inc(p);
   end;
 
  for b:=n-k downto k+1 do
   begin
     inc(a);
     s[b,k]:=p;
     inc(p);
   end
 end;
 
 for a:=1 to n do
  begin
    for b:=1 to m do
     write(s[a,b]:4,' ');
  writeln;
 end;
 readln;
end.
0
1 / 1 / 0
Регистрация: 18.01.2009
Сообщений: 87
20.10.2009, 12:05  [ТС] 6
элемент [2,2] должен сместится на место [1,1]

11 12 13
21 22 23
31 32 33

итоговая матрица:

22 11 12
31 21 13
32 33 23
0
Почетный модератор
64301 / 47596 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
20.10.2009, 12:53 7
Можно так.
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
uses crt;
var a:array[1..20,1..20]of integer;
    n,i,j:integer;
    x,y,num,add,dir:integer;
begin
clrscr;
write('n=');readln(n);
x:=0;{выход слева в первой строке}
y:=1;{с поля [1,2]}
num:=0;
Add:=n;{максимальный путь в строке и столбце}
dir:=1;{направление вправо и вниз}
while (add<>0) do
begin
  i:=0;
  while (i<>add) do
    begin
    x:=x+dir;{вправо}
    a[y,x]:=num;
    num:=num+1;
    i:=i+1;
    end;
  i:=0;
  add:=add-1;
  while (i<>add) do
    begin
    y:=y+dir;{вниз}
    a[y,x]:=num;
    num:=num+1;
    i:=i+1;
    end;
  dir:=dir*(-1);{меняем направление (влево и вверх)}
end;
a[1,1]:=n*n;{первый элемент}
for i:=1 to n do
   begin
     for j:=1 to n do
     write(a[i,j]:4);
     writeln;
   end;
readln
end.
0
1 / 1 / 0
Регистрация: 18.01.2009
Сообщений: 87
20.10.2009, 13:47  [ТС] 8
Thanks!)
0
20.10.2009, 13:47
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.10.2009, 13:47
Помогаю со студенческими работами здесь

Получить целочисленную квадратную матрицу порядка 7 элементами которой являются числа 1, 2, ., 49 расположенные з ней по спирали
12 Получить целочисленную квадратную матрицу порядка 7 элементами которой являются числа 1, 2, ...,...

Заполнить квадратную матрицу порядка N
Помогите пожалуйста решить!Очень-очень нужно. Заранее Спасибо!))

Заполнить квадратную матрицу по образцу
Кто может помочь с задачей? Если не сложно, то напишите только основную часть. То есть саму...

Заполнить квадратную матрицу порядка N по определенному правилу
Помогите пожалуйста решить! Заранее Спасибо!)) 3. Решить задачу: Заполнить квадратную матрицу...


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

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

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