Дан целочисленный двумерный массив n на m. Удвоить каждый элемент данного массива. Полученный массив вывести на экран. Помогите пожалуйста!!!

1

Ответы и объяснения

2014-04-10T17:01:12+00:00
Пишу на QBasic
CLS
DIM A(N,M)
...
Здесь заполнение массива
...
FOR I = 1 TO M
 FOR J = 1 TO N
  A(I,J)=2*A(I,J)
  PRINT A(I,J);
  PRINT  (" ");
 NEXT J
PRINT (" ")  
NEXT I
Спасибо, конечно, но мне нужно в FreePascal.