Нужно придумать формулу - Microsoft Office Excel

lolk · 08.04.2011, 02:03

Задача заключается в следующем:
Есть поле размером а * а, в центре поля записано число 0 (в ячейке (а\2+1,а\2+1). Остальные ячейки этого поля нужно заполнить рандомно так, чтобы сумма всех чисел, записанных в ячейках данного поля равнялась нулю. И при каждом запуске числа менялись.

MCH · 08.04.2011, 09:03

Так нужно формулами или макросом?
Во вложении вариант решения формулами

lolk · 08.04.2011, 16:25

Блин ошибся. Нужно макрос написать. Если не сложно можешь переписать в виде макроса?

lolk · 09.04.2011, 15:14

помогите пожалуйста!!

nilem · 09.04.2011, 17:56

Продолжил файл МСН.
Макрос такой, что не всегда с первого раза дает нужный результат, но при повторах все-таки получается (почему-то 17х17 чаще тормозит).

MCH · 09.04.2011, 18:06

Где Ваши попытки решить задачу? С чем возникли сложности?
Пока нет примера с указанием что должно получиться, возникае масса вопросов:
От куда брать параметр "а"?
Куда выводить матрицу?
Какой должен быть разброс чисел min, max? от куда брать эти данные?

Кроме того, тема звучит "Нужно придумать формулу", а сделать оказывается нужно на VBA.
Формула предложена, попробуейте с ней разобраться. Если получится, то и на VBA не сложно будет написать.

MCH · 09.04.2011, 20:57

и функция и VBA

MCH · 09.04.2011, 21:21

Попаразитировал на файле Николая, изменил алгоритм генерации

nilem · 09.04.2011, 22:05

Цитата:

Сообщение от MCH

...изменил алгоритм генерации

Да, видимо, даже в случайных нужно искать закономерность. Отличный пример, спасибо.

lolk · 09.04.2011, 22:20

Цитата:

Сообщение от MCH

Где Ваши попытки решить задачу? С чем возникли сложности?
Пока нет примера с указанием что должно получиться, возникае масса вопросов:
От куда брать параметр "а"?
Куда выводить матрицу?
Какой должен быть разброс чисел min, max? от куда брать эти данные?

Кроме того, тема звучит "Нужно придумать формулу", а сделать оказывается нужно на VBA.
Формула предложена, попробуейте с ней разобраться. Если получится, то и на VBA не сложно будет написать.

Попыток решения задачи нет, т.к. этот макрос является частью большой задачи. Условия не написал потому что я сам бы смог это сделать. Мне просто нужен был алгоритм заполнения матрицы. Поэтому по ошибке написал формулу в заголовке темы. А вашей предложенной формулой не смог разобраться.
Вам и nilem'y спасибо за решение задачи.

08.04.2011, 02:03	#1
lolk Пользователь Регистрация: 20.03.2011 Сообщений: 10	Нужно придумать формулу Задача заключается в следующем: Есть поле размером а * а, в центре поля записано число 0 (в ячейке (а\2+1,а\2+1). Остальные ячейки этого поля нужно заполнить рандомно так, чтобы сумма всех чисел, записанных в ячейках данного поля равнялась нулю. И при каждом запуске числа менялись.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Не могу придумать формулу на нахождение среднего балла	konistra	Microsoft Office Excel	3	08.04.2011 08:57
Не могу придумать формулу для поставленной задачи.	masaylov	Microsoft Office Excel	6	07.04.2011 11:11
Нужно придумать запросы для бд)	Alexeytur	Помощь студентам	2	18.12.2010 14:07
Помогите... Нужно придумать тему для...	tilekus	Свободное общение	5	15.02.2009 10:46
Не могу придумать или подобрать формулу! Помогите!	Gnom70	Microsoft Office Excel	4	30.01.2008 11:01

08.04.2011, 16:25	#3
lolk Пользователь Регистрация: 20.03.2011 Сообщений: 10	Блин ошибся. Нужно макрос написать. Если не сложно можешь переписать в виде макроса?

09.04.2011, 15:14	#4
lolk Пользователь Регистрация: 20.03.2011 Сообщений: 10	помогите пожалуйста!!

09.04.2011, 18:06	#6
MCH Форумчанин Регистрация: 21.11.2010 Сообщений: 326	Где Ваши попытки решить задачу? С чем возникли сложности? Пока нет примера с указанием что должно получиться, возникае масса вопросов: От куда брать параметр "а"? Куда выводить матрицу? Какой должен быть разброс чисел min, max? от куда брать эти данные? Кроме того, тема звучит "Нужно придумать формулу", а сделать оказывается нужно на VBA. Формула предложена, попробуейте с ней разобраться. Если получится, то и на VBA не сложно будет написать.