تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب : كود ترتيب مصفوفة ثنائية تصاعدياً + كود ضرب مصفوفة ثنائية
#1
Music 
السلام عليكم 
اخواني
اختكم من فلسطين


مبتدئة بالبرمجة 

اريد من احدكم ان يكتب لي كود

ترتيب مصفوفة ثنائية تصاعدياً + كود ضرب مصفوفة ثنائية


باسرع وقت

شكراً لكم 
الرد
تم الشكر بواسطة:
#2
ترتيب تصاعدي

PHP كود :
       Dim binArray As Integer() = New Integer() {1110011100}
 
       Dim first As Integer 0
        Dim last 
As Integer binArray.Length 1
        While first 
last
            If 0 
binArray(firstThen
                first 
+= 1
            ElseIf 1 
binArray(lastThen
                last 
-= 1
            Else
                binArray
(first) = 0
                binArray
(last) = 1
            End 
If
 
       End While 

ايضا الكود اعلاه يمكن تحويلة الي روتين كالتالي

PHP كود :
   Private Sub Sort(binArray As Integer())
 
       Dim first As Integer 0
        Dim last 
As Integer binArray.Length 1
        While first 
last
            If 0 
binArray(firstThen
                first 
+= 1
            ElseIf 1 
binArray(lastThen
                last 
-= 1
            Else
                binArray
(first) = 0
                binArray
(last) = 1
            End 
If
 
       End While
 
   End Sub 

و الروتين يستخدم كالتالي

PHP كود :
       Dim binArray As Integer() = New Integer() {1110011100}
 
       Sort(binArray
الرد
تم الشكر بواسطة: Amir_Alzubidy
#3
PHP كود :
Dim aray1D As Integer() = New Integer() {42396547}
Array.
Sort(aray1D

PHP كود :
Dim aray2D(,) As Double = {{42}, {39}, {65}, {47}}
Sort2DArray(aray2D
PHP كود :
Sub Sort2DArray(ByRef arr2D As Double(,))
    
Dim key(arr2D.GetLongLength(0) - 1) As Double
    Dim item
(arr2D.GetLongLength(0) - 1) As Double
    
For 0 To arr2D.GetLongLength(0) - 1
        key
(i) = arr2D(i0)
        
item(i) = arr2D(i1)
    
Next
    
Array.Sort(keyitem)
    For 
0 To arr2D.GetLongLength(0) - 1
        arr2D
(i0) = key(i)
        
arr2D(i1) = item(i)
    
Next
End Sub 
الرد
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم