Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
25
Task/Matrix-transposition/Yabasic/matrix-transposition.basic
Normal file
25
Task/Matrix-transposition/Yabasic/matrix-transposition.basic
Normal file
|
|
@ -0,0 +1,25 @@
|
|||
dim matriz(4,5)
|
||||
dim mtranspuesta(5,4)
|
||||
|
||||
for fila = 1 to arraysize(matriz(), 1)
|
||||
for columna = 1 to arraysize(matriz(), 2)
|
||||
read matriz(fila, columna)
|
||||
print matriz(fila, columna);
|
||||
mtranspuesta(columna, fila) = matriz(fila, columna)
|
||||
next columna
|
||||
print
|
||||
next fila
|
||||
print
|
||||
|
||||
for fila = 1 to arraysize(mtranspuesta(), 1)
|
||||
for columna = 1 to arraysize(mtranspuesta(), 2)
|
||||
print mtranspuesta(fila, columna);
|
||||
next columna
|
||||
print
|
||||
next fila
|
||||
end
|
||||
|
||||
data 78,19,30,12,36
|
||||
data 49,10,65,42,50
|
||||
data 30,93,24,78,10
|
||||
data 39,68,27,64,29
|
||||
Loading…
Add table
Add a link
Reference in a new issue