Помогите ввести матрицу...!, задачау знаю как делать, а вот как ввести такую матрицу? Опции

[sanek]

Задана квадратная матрица A вещественных чисел размера NxN(т.е 20 на 20)(n<=20, задается как параметр). Построить по ней матрицу B такого же размера
НЕ понимаю как ввести матрицу А ну и Б по ней...

[sanek]

20 на 20? что блин трудно написать что ли?

[samec]

20 на 20? что блин трудно написать что ли?

program vvod;
 var
 A:array[1..20,1..20]of real;
 N,i,j:integer;
begin
N:=20;
for i:=1 to N do
  for j:=1 to N do
    readln(A[i,j];
end.