Заполнить массив числами по формуле

@Jimmy567 · Регистрация: 15.05.2012

Студворк — интернет-сервис помощи студентам

Здравствуйте!

Надо заполнить одномерный массив случайными числами от 0 до 9, чтобы в итоге получилось число вида ASDF , по формуле:

AS-DF = A+S+D+F

@Alex77755 · 16.05.2012, 08:04

Таких комбинаций много(если я правильно понял задание)
3 1 1 8
3 2 1 8
3 3 1 8
3 4 1 8
3 5 1 8
3 6 1 8
3 7 1 8
3 8 1 8
3 9 1 8
4 1 2 7
4 2 2 7
4 3 2 7
4 4 2 7
4 5 2 7
4 6 2 7
4 7 2 7
4 8 2 7
4 9 2 7
5 1 3 6
5 2 3 6
5 3 3 6
5 4 3 6
5 5 3 6
5 6 3 6
5 7 3 6
5 8 3 6
5 9 3 6
6 1 4 5
6 2 4 5
6 3 4 5
6 4 4 5
6 5 4 5
6 6 4 5
6 7 4 5
6 8 4 5
6 9 4 5
7 1 5 4
7 2 5 4
7 3 5 4
7 4 5 4
7 5 5 4
7 6 5 4
7 7 5 4
7 8 5 4
7 9 5 4
8 1 6 3
8 2 6 3
8 3 6 3
8 4 6 3
8 5 6 3
8 6 6 3
8 7 6 3
8 8 6 3
8 9 6 3
9 1 7 2
9 2 7 2
9 3 7 2
9 4 7 2
9 5 7 2
9 6 7 2
9 7 7 2
9 8 7 2
9 9 7 2

@Linoge · 16.05.2012, 09:15

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Command1_Click()
Dim mas(10000)
n% = 0
For a% = 0 To 9
For s% = 0 To 9
For d% = 0 To 9
For f% = 0 To 9
If a * 10 + s - d * 10 - f = a + s + d + f Then
    mas(n) = a & s & d & f
    List1.AddItem mas(n)
    n = n + 1
End If
Next
Next
Next
Next
End Sub

В принципе можно пройти циклы дважды и сначала посчитать количество элементов, и объявить точный размер массива. Или сразу написать Dim mas(90) но только для конкретного примера.

Новые блоги и статьи Все статьи Все блоги /
Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.

@Jimmy567 0 / 0 / 0 Регистрация: 15.05.2012 Сообщений: 3

	Заполнить массив числами по формуле 15.05.2012, 20:57. Показов 1250. Ответов 2 Метки нет (Все метки) Здравствуйте! Надо заполнить одномерный массив случайными числами от 0 до 9, чтобы в итоге получилось число вида ASDF , по формуле: AS-DF = A+S+D+F 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	16.05.2012, 08:04
	Таких комбинаций много(если я правильно понял задание) 3 1 1 8 3 2 1 8 3 3 1 8 3 4 1 8 3 5 1 8 3 6 1 8 3 7 1 8 3 8 1 8 3 9 1 8 4 1 2 7 4 2 2 7 4 3 2 7 4 4 2 7 4 5 2 7 4 6 2 7 4 7 2 7 4 8 2 7 4 9 2 7 5 1 3 6 5 2 3 6 5 3 3 6 5 4 3 6 5 5 3 6 5 6 3 6 5 7 3 6 5 8 3 6 5 9 3 6 6 1 4 5 6 2 4 5 6 3 4 5 6 4 4 5 6 5 4 5 6 6 4 5 6 7 4 5 6 8 4 5 6 9 4 5 7 1 5 4 7 2 5 4 7 3 5 4 7 4 5 4 7 5 5 4 7 6 5 4 7 7 5 4 7 8 5 4 7 9 5 4 8 1 6 3 8 2 6 3 8 3 6 3 8 4 6 3 8 5 6 3 8 6 6 3 8 7 6 3 8 8 6 3 8 9 6 3 9 1 7 2 9 2 7 2 9 3 7 2 9 4 7 2 9 5 7 2 9 6 7 2 9 7 7 2 9 8 7 2 9 9 7 2 1

Заполнить массив числами по формуле

Решение