IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

 
Closed Topic Открыть новую тему 
> Заполнение массива змейкой, в один цикл
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 51
Пол: Мужской
Реальное имя: Серж

Репутация: -  0  +


Дан двумерный массив T(n, n) заполнить его методом змейки числами от 1 до n2. Например, матрица T(3, 3) будет иметь вид:
1 2 3
6 5 4
7 8 9
Алгоритм построения матрицы оптимизировать. Использовать один цикл.

Сообщение отредактировано: $rvr4vr -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

Репутация: -  55  +


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

З.Ы. Как-то красный напрягает. Это все-таки модераторско-админский цвет...


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Гость






Цитата
Алгоритм построения матрицы оптимизировать
Покажи то, что ты сделал, мы поможем это оптимизировать, договорились? А вообще-то неплохо бы и поиск использовать, заполнений "змейкой" на форуме штук 5 было разных...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Пионер
**

Группа: Пользователи
Сообщений: 51
Пол: Мужской
Реальное имя: Серж

Репутация: -  0  +


дык в том то и прикол что оптимизация тут это сделать ее в один цикл. в два то она простейшая задача, а в один я ума не приложу как nea.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Гость






Еще раз: то, что это просто - понятно...

Покажи, как ТЫ делаешь...
 К началу страницы 
+ Ответить 
сообщение
Сообщение #6


Гость






У меня почему-то получилось:
const
n = 5;
type
mx = array[1 .. n, 1 .. n] of integer;

var
a: mx;
i, j, count: integer;

begin
count := 1;
for i := 1 to n*n do begin
a[succ(pred(i) div n), count] := i;
inc( count,
byte((i mod n) <> 0)*(1 - 2 * byte(odd(i div n))) );
end;

for i := 1 to n do begin
for j := 1 to n do write(a[i, j]:4);
writeln;
end;
end.
 К началу страницы 
+ Ответить 
сообщение
Сообщение #7


Пионер
**

Группа: Пользователи
Сообщений: 51
Пол: Мужской
Реальное имя: Серж

Репутация: -  0  +


а можешь объяснить? а то меня спросят что делает к примеру это:
"a[succ(pred(i) div n), count] := i;
inc( count, byte((i mod n) <> 0)*(1 - 2 * byte(odd(i div n))) );" ?
а я не смогу ответить. dry.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #8


просто человек
******

Группа: Пользователи
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

Репутация: -  55  +


почитай про ф-ции succ,pred,div,inc,odd и все поймешь....
тебе пытались помочь все делать - сам же отказался. дали готовый код....


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #9


Пионер
**

Группа: Пользователи
Сообщений: 51
Пол: Мужской
Реальное имя: Серж

Репутация: -  0  +


Цитата(мисс_граффити @ 5.11.2006 17:01) *

тебе пытались помочь все делать - сам же отказался. дали готовый код....


вот только не надо этого. ну не разбираюсь я в пасе и все тут. не всем же это дано. а так спасибо за помощь...

 ! 
"Не разбираюсь я в пасе" А ты что хотел? "Пришел, увидел, победил"? Так не бывает... Не пытаешься разобраться - поэтому и не разбираешься...



Сообщение отредактировано: volvo -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Closed Topic Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 1.11.2020 5:35
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name