1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | INPUT "кол-во строк в массиве=";n INPUT "кол-во столбцов в массиве=";m DIM A(n,m) RANDOMIZE TIMER PRINT"ishodnyj massiv" FOR I= 1 TO n FOR J= 1 TO m A(i,j)=(RND* 100 )- 200 PRINT a(i,j); NEXT J PRINT NEXT I SWAP A( 1 , 1 ), A(n,m) PRINT "полученный массив" PRINT FOR I= 1 TO n FOR J= 1 TO m PRINT A(i,j); NEXT J PRINT NEXT I |