在Pascal编程语言中，创建和操作矩阵的方法如下：
输入矩阵
使用嵌套循环结构来读取矩阵的每一行和每一列。
转置矩阵
创建一个新的二维数组，用于存储转置后的矩阵。
使用嵌套循环结构，将原矩阵的元素按转置规则赋值到新数组中。
输出矩阵
使用嵌套循环结构，将转置后的矩阵元素逐行逐列输出。
```pascal
program trans（input, output）；
const M = 3； N = 4；
var i, j: integer；
a: ARRAY [1..M, 1..N] OF REAL；
b: ARRAY [1..N, 1..M] OF REAL；
begin
writeln（'Input the matrix line by line:'）；
for i := 1 to M do
begin
for j := 1 to N do
read（a[i,j]）；
readln；
end；
for i := 1 to N do
for j := 1 to M do
b[i,j] := a[j,i]；
writeln（'After transpose, the matrix is:'）；
for i := 1 to N do
begin
for j := 1 to M do
write（b[i,j]:6:2）；
writeln；
end；
end.
```
解释
常量和变量声明
`const M = 3； N = 4；`：定义矩阵的行数M和列数N。
`var i, j: integer；`：声明循环变量。
`a: ARRAY [1..M, 1..N] OF REAL；`：声明原矩阵数组。
`b: ARRAY [1..N, 1..M] OF REAL；`：声明转置后的矩阵数组。
输入矩阵
使用两个嵌套的`for`循环，分别遍历行和列，读取原矩阵的元素。
转置矩阵
再次使用两个嵌套的`for`循环，将原矩阵的元素按转置规则赋值到新矩阵中。
输出矩阵
使用两个嵌套的`for`循环，逐行逐列输出转置后的矩阵元素。
建议
确保在使用矩阵时，矩阵的维度是有效的，避免数组越界。
在实际应用中，可以根据需要调整矩阵的维度和输入输出格式。