Работа с матрицой Нужно перевести кусок кода из консольного…

Работа с матрицой Нужно перевести кусок кода из консольного приложения в форму. write ('Размер первой матрицы'); readln (k); write ('Размер второй матрицы '); readln (n); randomize; for i: =1 to k do for j: =1 to k do a[i,j]: =0,5-random; for i: =1 to n do for j: =1 to n do b[i,j]: =0,5-random; writeln ('Первая матрица '); for i: =1 to k do begin for j: =1 to k do write (a[i,j]: 8:3); writeln; end;