Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
 Аватар для Зои
2 / 2 / 0
Регистрация: 26.05.2009
Сообщений: 26

Привести массив к требуемому виду

26.05.2009, 18:02. Показов 1584. Ответов 7
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пожалуйста, помогите решить задачу с массивами! У меня не работает, а нужно срочно!!! Заранее, спасибо

Суть задачи в прикрепленном файлике
Вложения
Тип файла: rar На помощь!.rar (6.1 Кб, 29 просмотров)
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
26.05.2009, 18:02
Ответы с готовыми решениями:

Один документ привести к виду другого
Добрый день уважаемые форумчане. На работе задали такое вот задание-написать макрос, но с макросами я далеко на "Вы". Буду очень...

Привести дробь вида a/b к несократимому виду
Как привести дробь к несократимому виду?

Привести массив к виду
Подскажите как привести массив coord к виду массива Pts. public void button5_Click(object sender, EventArgs e) { ...

7
 Аватар для Toxa33rus
3919 / 920 / 125
Регистрация: 16.04.2009
Сообщений: 1,952
26.05.2009, 20:47
Мало чего понял.
Исходная таблица всегда в таком виде? (5 пр х 5 строк х 7 групп)
Как я понял делать надо формулами эксель?
Что такое "кол-во повторений" и вообще откуда что взялось в первой маленькой табличке?

Заранее пожалуйста
1
 Аватар для Зои
2 / 2 / 0
Регистрация: 26.05.2009
Сообщений: 26
26.05.2009, 21:15  [ТС]
Делать надо программно..
Сочетания 0 и 1 в первой в исходной таблице может меняться.(те данные для примера)

В обчем так..
0 и 1 - это состав смен продавцов. 1 - в этот день работает,0-отдыхает.
всего таких сочетаний для этого графика возможно 5 (максимум всего 10)! Потом они повторяются.
в этой таблице 35 рабочих дней.
Как по идее должна работать программа.. i-я срока - это i-я группа,заработала в i-й выручку, которая соответствует номеру строки
потом дальше. потом если строка повторяется, ето уже следующий день когда работает именно эта группа! дело в том, что выручку за месяц надо не суммировать, а записывать в отдельнвый массив ))

первый маленький массив - состав смен и слолько раз за 35 дней вышли эти работники (н-р, 1 строка - работали пр1,пр2 и пр3, всего в таком сочетании они за 35 дней вышли 7 раз) 7 - это и есть количество повторений! =) Больше это число нам не понадобится =)

Дальше надо найти, сколько денежек каждая из этих групп заработала за каждый из 7 своих рабочих дней!!! это уже наш второй массив =)=)=)

гр1 гр2 гр3 гр4 гр5
10000 11200 12200 9900 2000
5800 10300 3600 23400 12000
10000 11200 12200 9900 2000

Вот такая штучка должна получиться, только с 7 строками (=35/5)
то есть 1 группа за первый раб день заработала 10000, за второй 5800, за третий 10000, и т.д. =)=)=)=)

Надеюсь, так будет понятней... если нет, спрашивайе

Добавлено через 1 минуту 17 секунд
не очень ровно массив получился, но надеюсь, понятно..
0
 Аватар для Toxa33rus
3919 / 920 / 125
Регистрация: 16.04.2009
Сообщений: 1,952
26.05.2009, 22:50
Ой я что-то и забыл про Вас. Я не стал дожидаться и сделал через обычные формулы.
Сейчас макрос напишу. А пока вот:
Вложения
Тип файла: rar На помощь!.rar (6.4 Кб, 18 просмотров)
0
 Аватар для Toxa33rus
3919 / 920 / 125
Регистрация: 16.04.2009
Сообщений: 1,952
26.05.2009, 23:29
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim tmpArr(0 To 34)
For i = 0 To 34
  Cells(i \ 5 + 22, i Mod 5 + 9).Formula = Cells(i + 3, 6).Value
  tmpArr(i) = Cells(i + 3, 1).Value * 10000 + Cells(i + 3, 2).Value * 1000 + _
              Cells(i + 3, 3).Value * 100 + Cells(i + 3, 4).Value * 10 + Cells(i + 3, 5).Value
Next i
 
Dim testVal
For i = 1 To 5
  testVal = Cells(i + 12, 10).Value * 10000 + Cells(i + 12, 11).Value * 1000 + _
            Cells(i + 12, 12).Value * 100 + Cells(i + 12, 13).Value * 10 + Cells(i + 12, 14).Value
  Cells(i + 12, 15).Value = 0
  For j = 0 To 34
    If testVal = tmpArr(j) Then Cells(i + 12, 15).Value = Cells(i + 12, 15).Value + 1
  Next j
Next i
1
 Аватар для Зои
2 / 2 / 0
Регистрация: 26.05.2009
Сообщений: 26
26.05.2009, 23:44  [ТС]
Спасибо большое Все работает
А это все возможно сделать с динамическими массивами?..
0
 Аватар для Зои
2 / 2 / 0
Регистрация: 26.05.2009
Сообщений: 26
27.05.2009, 00:46  [ТС]
Все, сделала Ещё раз спасибо
0
 Аватар для Toxa33rus
3919 / 920 / 125
Регистрация: 16.04.2009
Сообщений: 1,952
27.05.2009, 10:54
Приходите еще
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
27.05.2009, 10:54
Помогаю со студенческими работами здесь

При каких N массив всегда можно привести к отсортированному виду
В массиве из N элементов разрешается между собой менять 1 и 3 элементы, 2 и 4, 3 и 5, 4 и 6 и т.д., а также первый и последний. Все...

С виду простое однородное уравнение. Нужно привести к виду F(x,y)=C
Из 250 задач ВУЗа решил все, за исключением единственной! (Хотя по части задач были недопонимания - спасибо форуму!) Ветку читал...

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

Привести к каноническому виду
помогите пожалуйста!!Нужно привести к каноноческому виду 1.16 Uxx+8Uxy+Uyy-16Ux-4Uy=0 2.Uxx+12Uxy+27Uyy=0

Привести к каноническому виду
Привести к каноническому виду уравнения линий 2 порядка. Установить тип этих линий и расположение. Уравнение : 4xy+9=0


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Новые блоги и статьи
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru