나는 홀의 도움을 받는다) - 페이지 2

새 코멘트
 
Richie : 그러나 진행 공식은 육안으로 거의 명확합니다. Y \u003d int (8.3069 * e ^ (0.1825 * x) + 0.5).

그것은 연대기에있을 수 있습니다. 좋은.

단지, 아마도 "대략 분명"(그는 그것을 거절했습니다!)이 아니라 "대략 벌거벗은 사람에게 명백합니다" :)

 

물론 당신은 할 수. 사람들은 농담을 이해하지 못합니다. 정신 차렸을 때 뵙겠습니다 :)

여기 또 다른 농담이 있습니다. 프로그램은 작동하지만 실행하지 않는 것이 좋습니다. 

Private Sub Command1_Click()
Dim i1 As Integer
Dim i2 As Integer
Dim i3 As Integer
Dim i4 As Integer
Dim i5 As Integer
Dim i6 As Integer
Dim i7 As Integer
Dim i8 As Integer
Dim sum As Long
For i1 = 0 To 30
For i2 = 0 To 30
For i3 = 0 To 30
For i4 = 0 To 30
For i5 = 0 To 30
For i6 = 0 To 30
For i7 = 0 To 30
For i8 = 0 To 30
sum = Chisla(i1) + Chisla(i2) + Chisla(i3) + Chisla(i4) + Chisla(i5) + Chisla(i6) + Chisla(i7) + Chisla(i8)
   If sum = Int(Val(Text1.Text)) Then
   Print i1; i2; i3; i4; i5; i6; i7; i8
   End If
Next i8
Next i7
Next i6
Next i5
Next i4
Next i3
Next i2
Next i1
End Sub


Private Function Chisla(Nomer As Integer)
If Nomer = 0 Then Chisla = 0
If Nomer = 1 Then Chisla = 10
If Nomer = 2 Then Chisla = 12
If Nomer = 3 Then Chisla = 14
If Nomer = 4 Then Chisla = 17
If Nomer = 5 Then Chisla = 21
If Nomer = 6 Then Chisla = 25
If Nomer = 7 Then Chisla = 30
If Nomer = 8 Then Chisla = 36
If Nomer = 9 Then Chisla = 43
If Nomer = 10 Then Chisla = 52
If Nomer = 11 Then Chisla = 62
If Nomer = 12 Then Chisla = 74
If Nomer = 13 Then Chisla = 89
If Nomer = 14 Then Chisla = 107
If Nomer = 15 Then Chisla = 128
If Nomer = 16 Then Chisla = 154
If Nomer = 17 Then Chisla = 185
If Nomer = 18 Then Chisla = 222
If Nomer = 19 Then Chisla = 266
If Nomer = 20 Then Chisla = 319
If Nomer = 21 Then Chisla = 383
If Nomer = 22 Then Chisla = 460
If Nomer = 23 Then Chisla = 552
If Nomer = 24 Then Chisla = 662
If Nomer = 25 Then Chisla = 795
If Nomer = 26 Then Chisla = 954
If Nomer = 27 Then Chisla = 1145
If Nomer = 28 Then Chisla = 1374
If Nomer = 29 Then Chisla = 1648
If Nomer = 30 Then Chisla = 1978
End Function
양식에 단추와 텍스트 필드를 놓습니다. 텍스트 상자에 N을 입력합니다 .
 
Richie :

양식에 단추와 텍스트 필드를 놓습니다. 텍스트 상자에 N을 입력합니다.


그리고 30분 안에 결과를 얻을 수 있습니까?
 

Excel에서 솔루션을 검색할 수 있지만 무엇이 적합할지 잘 모르겠습니다...

옵션을 검색할 프로그램을 스케치할 수 있습니다.

글쎄, 무거운 수학 프로그램을 끌어올 수 있습니다.


예, 여기서 우리는 H 값이 같은 값 a, b, c ...에 대해 다른 옵션을 제공하는 프로그램이 필요합니다.

이 숫자에는 규칙성이 없습니다.

숫자 a 와 같을 수 있는 이러한 숫자 외에도 고유한 값을 갖는 b, c, ... 변수가 있지만 일반적으로 17개의 그러한 변수가 있음을 잊지 마십시오.))).

나는 Excele에서 그것을 시도했지만 거기에서 두뇌는 순환, 순위 기능 등에서 터질 것입니다. 누군가 성공하면 나는 그를 부러워한다.

 

문제는 최적화 문제로 공식화될 수 있습니다.

주어진 벡터 a =(10, 12, 14, 17, 21, 25, 30, 36, 43, 52, 62, 74, 89, 107, 128, 154, 185, 222, 266, 319, 3083, 552, 662, 795, 954, 1145, 1374, 1648, 1978).

세트 {0,1}의 좌표 값으로 두 번째 벡터 b 를 찾습니다(물론 동일한 수의 좌표, 즉 30) - 다음과 같이 | a*b - H | -> 분. 벡터의 곱은 스칼라입니다. Excel에서는 GA(애드온 "솔루션 검색")의 도움으로 해결됩니다.

나는 이 문제의 깊이를 모른다. 최악의 경우 모든 옵션 중 2^30 ~ 10^9가 있습니다. 원칙적으로 현대 피쉬크의 경우 작업은 해결할 수 있습니다.

 
timezero :

Excel에서 솔루션을 검색할 수 있지만 무엇이 적합할지 잘 모르겠습니다...

옵션을 검색할 프로그램을 스케치할 수 있습니다.

글쎄, 무거운 수학 프로그램을 끌어올 수 있습니다.


예, 여기서 우리는 H 값이 같은 값 a, b, c ...에 대해 다른 옵션을 제공하는 프로그램이 필요합니다.

이 숫자에는 규칙성이 없습니다.

숫자 a 와 같을 수 있는 이러한 숫자 외에도 고유한 값을 갖는 b, c, ... 변수가 있지만 일반적으로 17개의 그러한 변수가 있음을 잊지 마십시오.))).

나는 Excele에서 그것을 시도했지만 거기에서 두뇌는 순환, 순위 기능 등에서 터질 것입니다. 누군가 성공하면 나는 그를 부러워한다.

찾아보니 효과가 있을 수 있습니다.

예를 들어 1에서 우리는 숫자를 찾을 것입니다.

b1,c1,d1...에서 숫자는 b2-b17, c2-c17에서 필요한 숫자 범위로 대체됩니다.

a1에서 인덱스로 범위에서 숫자를 선택하고 범위 2..17을 제한에 추가하는 수식

 
그리고 Excel에서 수식으로 설명하는 방법은 무엇입니까?
 
Excel에서는 이것을 볼 수 없습니다. 30개의 값으로 구성된 17개의 그룹이 있는 경우 옵션이 몇 개나 있는지 상상할 수 있습니까? 정말로 답이 필요하다면 - 누군가에게 C로 프로그램을 작성해 달라고 요청하고, 매우 강력한 서버를 찾고, 시작하고 기다리십시오. 몇 년 안에 결과를 얻을 것입니다.
 
Richie :

물론 당신은 할 수. 사람들은 농담을 이해하지 못합니다. 정신 차렸을 때 뵙겠습니다 :)

여기 또 다른 농담이 있습니다. 프로그램은 작동하지만 실행하지 않는 것이 좋습니다.

양식에 버튼과 텍스트 필드를 놓습니다. 텍스트 상자에 N을 입력합니다.



숫자가 포함된 배열을 선언하고 인덱스로 액세스하는 것이 더 낫습니다. if 없이는 훨씬 빠르게 작동합니다. mq4에서는 vb6보다 10배, mql5에서는 훨씬 더 빠릅니다. 훨씬 빠릅니다.

숫자[]={10, 12, 14, 17, 21, 25, 30, 36, 43, 52, 62, 74, 89, 107, 128, 154, 185, 222, 266, 319, 3083, 5 , 662, 795, 954, 1145, 1374, 1648, 1978};

 
Integer :


mql5에서는 훨씬 더 좋습니다. 더 빠릅니다.

mql5에 대한 계산은 TS의 전체 의식 수명을 앗아갈 수 있음)

123456789...11
새 코멘트