ماتريس ها

[mona rahimi]

[font=&quot][/font] [font=&quot]ممكن در حل اين مسئله كمكم كنيد
[/font]
[font=&quot]برنامه[/font][font=&quot] ای بنویسیدکه یک ماتریس[/font] [font=&quot]n*m[/font][font=&quot]ر ابرای سطرهای فردازچپ به راست وبرای سطرهای زوج ازراست به چپ چاپ کند.[/font][font=&quot][/font]​

 

[the_king]

[font=&quot][/font] [font=&quot]ممكن در حل اين مسئله كمكم كنيد
[/font]
[font=&quot]برنامه[/font][font=&quot] ای بنویسیدکه یک ماتریس[/font] [font=&quot]n*m[/font][font=&quot]ر ابرای سطرهای فردازچپ به راست وبرای سطرهای زوج ازراست به چپ چاپ کند.[/font][font=&quot][/font]​

زبان برنامه نویسی رو مشخص نکردید.

 

[mona rahimi]

vb6

 

[ali.2]

منظورتون از چپ به راست یا از راست به چپ رو متوجه نمیشم. مثلا اگه این سطر [1 5 6 4 7 8 9 1 2 5 0 0 8] از راست به چپ جا به جا بشه چی میشه؟

Define g(mat)=Func
Local m,n,i,j,mat1
mat1:=mat
[m:=dim(mat)[1
[n:=dim(mat)[2
For i:=1 To m Do
If mod(i,2)=1 Then
For j:=1 To n Do
[mat1[i,j]:=mat[i,n-j+1
EndFor
EndIf
EndFor
Return mat1
EndFunc​