آرایه ها

[muslemrahmati]

دوستان سلام، کد این برنامه ها رو با زبان ویژوال بیسیک6 میخوام

1-برنامه جستجوی دو دویی آرایه ها را پیاده سازی کنید

2-برنامه ای که اعداد سه رقمی زوج را در خانه هایی از آرایه با اندیس فرد قرار دهد و اعداد سه رقمی فرد را در خانه های همان آرایه با اندیس زوج قرار دهد.

3-برنامه ای که در سه آرایه a,c,b به ترتیب مقادیر زیر را قرار دهد؟
-در ارایه a مضارب عدد 3 کوچکتر است و در آرایه b اعداد اول بین 1 تا 100 را قرار دهد و در آرایه c حاصل جمع خانه های متناظر a,b را بدست آورد.

کد کاملشون رو میخوام عزیزان

[mr-adler]

سلام
چون تازه به این انجمن وارد شدید و با قوانین زیاد اشنایی ندارید لطفا یه بار دیگه قوانین رو بخونید. در خواست پروژه ممنوعه....
بنا به قوانین نباید پاسخ داد به هر حال سوال 2 برام جالب بود اون را اینجور نوشتم:

Dim a(100 To 998) As String
Dim b(101 To 999) As String
Private Sub Command1_Click()
Dim i
For i = 100 To 999
If i Mod 2 = 0 Then
a(i) = i + 1
Print "j(" & i & ")" & "=" & a(i)
Else
b(i) = i - 1
Print "f(" & i & ")" & "=" & b(i)
End If
Next iیادتون نره حتما قوانین رو مطالعه کنید...:چشمک: