Заполнить квадратную матрицу

[ac1d_buRn]

Нуждаюсь в помощи
Заполнить квадратную матрицу А, каждый элемент которой определяется следующим образом (порядок матрицы вводится в диалоговом режиме)

MATLAB

[Qaliti]

CLS
input "Введите кол. строк матрицы:", n
input "Введите кол. столбцов матрицы:", m
DIM A(n,m)
// вводим матрицу
for i = 1 to n step 1
 for j = 1 to m step 1
  print "Введите матрицу A(";i;,;j;)
  input A(i,j)
 next j
next i
// заполняем нужными значениями
for i = 1 to n step 1
 for j = 1 to m step 1
  if  i > j then A(i,J) = i - j else if i = j then A(i,j) = i + j else if i < j then A(i,j) = i^2 + j^2
 next j
next i
// выводим на экран
for i = 1 to n step 1
 for j = 1 to m step 1
  print "A(";i;,;j;)"=" A(i,j)
 next j
next i
END

[ac1d_buRn]

Qaliti, Error: ??? Undefined function or variable 'CLS'. =(

[Qaliti]

это на qBasic-е