Сформировать двумерный массив. Добавить в него столбец с заданным номером

@Vanchik · Регистрация: 12.12.2012

4. Сформировать двумерный массив. Добавить в него столбец с заданным номером.
Помогите пожалуйста(

@urbic · 14.12.2012, 10:54

QBasic/QuickBASIC

CLS
n = 4
m = 4
 DIM a(1 TO n, 1 TO m), new(1 TO n, 1 TO m + 1)
 FOR i = 1 TO n
 FOR j = 1 TO m
 a(i, j) = INT(RND * 100 - 50)
 PRINT a(i, j);
 NEXT j
 PRINT
 NEXT i
 INPUT "k"; k
 FOR i = 1 TO n
FOR j = 1 TO m
IF j < k THEN new(i, j) = a(i, j)
 IF j = k THEN new(i, k) = 0
IF j >= k THEN new(i, j + 1) = a(i, j)
NEXT j
NEXT i
FOR i = 1 TO n
FOR j = 1 TO m + 1
PRINT new(i, j);
NEXT j
PRINT
NEXT i

@Vanchik · 14.12.2012, 17:15 **[ТС]**

спасибо большое)))

@Vanchik 0 / 0 / 0 Регистрация: 12.12.2012 Сообщений: 11
		1
	Сформировать двумерный массив. Добавить в него столбец с заданным номером 12.12.2012, 13:34. Показов 1508. Ответов 2 Метки нет (Все метки) 4. Сформировать двумерный массив. Добавить в него столбец с заданным номером. Помогите пожалуйста( __________________ Помощь в написании контрольных, курсовых и дипломных работ здесь 0

@Vanchik 0 / 0 / 0 Регистрация: 12.12.2012 Сообщений: 11
	14.12.2012, 17:15 [ТС]	3
	спасибо большое))) 0

Опции темы

Сформировать двумерный массив. Добавить в него столбец с заданным номером

Решение