ماتریس بالا/پایین مثلث

[www.ilampro.com]

سلام بر تمام دوستان زحمت کش این سایت محبوب
دوستان عزیز هر کی درباره ماتریس بالا و پایین مثلث چیزی می دونه از ما دریغ نکنه
اگه مثال هم بزنید ما را بسیار شرمنده خود خواهید کرد
موفق باشید

[mononok]

سلام دوست عزیز
اگه شکلشون رو میخواید که این جوریه
پایین مثلثی:

a11

a21  a22  

a31  a32  a33

a41  a42  a43  a44

بالا مثلثی:

a11  a12  a13  a14

     a22  a23  a24

          a33  a34

               a44

ولی اگه رابطه می خواهید بگویید کمکتون کنم
در بالا مثلثی i<j و در پایین مثلثی i>j ودر قطر اصلی مشترک هم i=j
(i=سطر j=ستون)

[www.ilampro.com]

سلام به تمام دوستان و نيز شما كه حواب ما رو دادي
ببخشيد دوست عزيز منظور من اين بود كه در رابطه با فرمول هايي كه با اين ماتريس سرو كار دارند
اگه تونستيد كمك كنيد
موفق باشيد

[SilverLearn]

با سلام خدمت دوست گرامي من يك مثال با وي بي برات زدم كه اميد وارم در يادگيري شما كمك كنه

Private Sub cmdpaeenmosalasi_Click() 

Dim a(1 To 5, 1 To 5) As Integer, n As Integer, i, j 

 For i = 1 To 5 

    For j = 1 To 5 

      If i > j Then 

        a(i, j) = 0 

        Else 

       n = InputBox(" please enter element  " & " row = " & i & "col= " & j) 

       While n = 0 

       n = InputBox(" please enter element  " & " row = " & i & "col= " & j) 

 

       Wend 

       a(i, j) = n 

       End If 

    Next 

 Next 

For i = 1 To 5 

    For j = 1 To 5 

     Print a(i, j); 

    Next 

Print 

Next 

End Sub 

البته شما مي تونيد براي بالامثلثي هم فقط كد زير را در كد بالا تغيير دهيد

If i > j Then

به
If i<j then

موفق باشيد
محمد عبدالهي
http://silverlearn.mihanblog.com

[pesar irooni]

هر کدام دارای n (n+1) * 1/2 عنصر غیرصفر و n (n-1) * 1/2 عنصر صفر هستند.
برای پیاده سازی این ماتریس ها به جای آرایه دو بعدی از آرایه یک بعدی که n (n+1) * 1/2 عنصر دارد استفاده میشود و مثلا برای ماتریس پایین مثلثی عنصر عنصر واقع در سطر J و ستون K به صورت زیر حساب میشود:

A[J,K] == B[L] that L = J (J-1)/2 + k