Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

C++

Войти
Регистрация
Восстановить пароль
 
Dashka_pazuhina
Сообщений: n/a
#1

Прикладное применение методов принятия решений. Метод Консенсус. - C++

21.04.2014, 14:38. Просмотров 338. Ответов 0
Метки нет (Все метки)

Рееебят тема такая: Прикладное применение методов принятия решений. Метод Консенсус. нужно реализовать свой пример на С++ к примеру это могут быть компьютеры или телефоны! Я смогла реализовать это только на VBA, но мне срочно надо на С++, помоооогите пожалуйста!!!

Вот пример на VBA:

Visual Basic
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
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
Sub KURSACH()
Dim i As Integer, j As Integer, a1 As String, a2 As Single, a3 As String, a4 As Integer, a5 As Single, a6 As Double, a22 As Double
Dim max As Single, maxi As Integer, name As String
max = 0
i = 2
Sheets("Лист1").Select
Do While Cells(i, 1) <> ""
a1 = Cells(i, 1)
If a1 = "Apple" Or a1 = "Lenovo" Then
Cells(i, 9) = 1
Else: Cells(i, 9) = 0
End If
i = i + 1
Loop
i = 2
Do While Cells(i, 4) <> ""
a3 = Cells(i, 4)
If a3 = "Core i7" Then
Cells(i, 12) = 1
ElseIf a3 = "Core i5" Then
Cells(i, 12) = 0.5
Else: Cells(i, 12) = 0
End If
i = i + 1
Loop
max = 0
i = 2
Do While Cells(i, 3) <> ""
a2 = Cells(i, 3)
If a2 > max Then max = a2
i = i + 1
Loop
i = 2
Do While Cells(i, 3) <> ""
Cells(i, 11) = 1 - (Cells(i, 3) / max)
i = i + 1
Loop
max = 0
i = 2
Do While Cells(i, 5) <> ""
a4 = Cells(i, 5)
If a4 > max Then max = a4
i = i + 1
Loop
i = 2
Do While Cells(i, 4) <> ""
Cells(i, 13) = (Cells(i, 5) / max)
i = i + 1
Loop
i = 2
Do While Cells(i, 6) <> ""
a5 = Cells(i, 6)
If a5 = "750" Then
Cells(i, 14) = 1
Else: Cells(i, 14) = 0
End If
i = i + 1
Loop
i = 2
Do While Cells(i, 7) <> ""
a7 = Cells(i, 7)
If a7 > max Then max = a7
i = i + 1
Loop
i = 2
Do While Cells(i, 7) <> ""
Cells(i, 15) = 1 - Cells(i, 7) / max
i = i + 1
Loop
i = 2
Sum = 0
Do While Cells(i, 9) <> ""
Cells(i, 16) = Cells(i, 9) + Cells(i, 11) + Cells(i, 12) + Cells(i, 13) + Cells(i, 11) + Cells(i, 14) + Cells(i, 15)
i = i + 1
Loop
i = 2
j = 0
Do While Cells(i, 16) <> ""
If Cells(i, 16) > max Then max = Cells(i, 16): j = i
i = i + 1
Loop
MsgBox "Лучший ноутбук " + Cells(j, 1) + " " + Cells(j, 2)
End Sub
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.04.2014, 14:38
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Прикладное применение методов принятия решений. Метод Консенсус. (C++):

Система поддержки принятия решений на С++ - C++
Здравствуйте. Если честно, не знаю даже, в каком разделе этот вопрос задавать. ______ Дали мне задание написать на С++ программу, где...

Многомерные таблицы принятия решений - C++
Мне нужно написать демонстрационную программку по многомерным таблицам принятия решений. А в голову ни чего не приходит . Можете что...

Баевский МЕТОД ПРИНЯТИЯ РЕШЕНИЙ - C (СИ)
Помогите написать задачьку (сама честно нечего не смыслю) 3. Программа должна рассматривать случай с несколькими болезнями и симптомами,...

Алгоритм принятия решений - Matlab
Здравствуйте, подскажите пожалуйста, как написать алгоритм принятия решений. В результате опыта получаются данные, изображенные на...

Принятия решений,паскаль! - Pascal
Определить, имеется ли среди заданных целых чисел A, B, C хотя бы одно чётное. Заранее огромное спасибо!

Компоненты поддержки принятия решений - Delphi
Народ! Ищу компоненты поддержки принятия решений (типа DecisionCube) для Delphi, которые могут работать БЕЗ BDE? (Лучше freeware и с...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.04.2014, 14:38
Привет! Вот еще темы с ответами:

Методы принятия управленческих решений - Экономика
Ребят помогите решить задачку. составить план выпуска бумаги,обеспечивающий наибольшую прибыль,если

Теория принятия решений в условиях риска - Математика
Фермер может выращивать либо кукурузу, либо соевые бобы. Вероятность того, что цены на будущий урожай понизятся, останутся на прежнем...

Учет целочисленности в задачах принятия решений - Методы оптимизации
привет :) пожалуйста помогите решить одну задачу :) наполовину решил, график построил не до конца и не могу дальше :( Учет...

Моделирование систем принятия решений с помощью VBA - Visual Basic
книга &quot;Моделирование с помощью Microsoft Excel и VBA: разработка систем поддержки принятия решений&quot; :!: ...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru