17.06.2013, 20:31. Просмотров 1333. Ответов 1
Здравствуйте!Помогите, пожалуйста, перевести задачу о распределении инвестиций с visual basic на C++.
| 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
| 1. ReDim B(0 to M)
2.
3. B(M)=0
4. ReDim Usub(1 To N, 0 To M)
5. For i=N To 1 Step -1
6. x1=M: if i=1 Then x1=0
7. For x=0 To x1
8. u0=0: u1=M-x: if i=N Then u0=u1
9. For u=u0 To u1
10. y=x+u
11. s=Z(i,u)+B(y)
12. If u>u0 Then
13. If s<=sMax Then Go To Cycle
14. End if
15. sMax=s^ Usub(i,x)=u
16. Cycle:
17. Next
18. B(x)=sMax
19. Next
20. B(x)=sMax
21. Next
22. Next
23.
24. Zmax=B(0)
25. ReDim Uoptim(1 To N)
26. x=0
27. For i=1 To N
28. Uoptim(i)=Usub(i,x)
29. x=x+Uoptim(i)
30. Next |
|
