Сформировать квадратную матрицу порядка n по заданному образцу

@NewSky · Регистрация: 19.12.2010

Студворк — интернет-сервис помощи студентам

n 0 0 .... 0 0 0
n-1 n 0 .... 0 0 0
n-2 n-1 n ..... 0 0 0
. . . .... . . .
2 3 4 .... n-1 n 0
1 2 3 ..... n-2 n-1 n

echs · 20.06.2016, 14:27

проверено

QBasic/QuickBASIC

CLS
INPUT "N = "; n
OPTION BASE 1
DIM M(n, n) AS INTEGER
 
FOR i = 1 TO n
FOR j = 1 TO n
   IF i >= j THEN M(i, j) = n + j - i
NEXT j, i
 
FOR i = 1 TO n
FOR j = 1 TO n
   PRINT M(i, j);
NEXT j: PRINT
NEXT i
END

@NewSky 0 / 0 / 0 Регистрация: 19.12.2010 Сообщений: 7
		1
	Сформировать квадратную матрицу порядка n по заданному образцу 19.12.2010, 19:27. Показов 1083. Ответов 1 Метки нет (Все метки) n 0 0 .... 0 0 0 n-1 n 0 .... 0 0 0 n-2 n-1 n ..... 0 0 0 . . . .... . . . 2 3 4 .... n-1 n 0 1 2 3 ..... n-2 n-1 n 0

Опции темы

Сформировать квадратную матрицу порядка n по заданному образцу

Решение