问pascal语言矩阵怎么编?,希望写下每步的意思

如题所述

一级算法
1.输入矩阵a
2.用循环结构a for do
3.用循环结构把a用输出b
4.输出b矩阵
编一个转置MXN阶矩阵的程序
4 -5 6 12 4 0 3
0 1 22 9 变成 -5 1 15
3 15 4 10 6 22 4
12 9 10
原矩阵 转置后的矩阵
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.
温馨提示:内容为网友见解,仅供参考
第1个回答  2008-12-14
最好用二维数组。
program matrix;
var a:array[1..10,1..10]of integer;
i,j:integer;
begin
for i:=1 to 10 do
for j:=1 to 10 do
read(a[i,j]);
.....
end.
第2个回答  2008-12-13
当然用二维数组方便快捷,当然也可以用一维数组,你想用什么都可以,首选二维。算你问对了人,我是PASCAL高手

问pascal语言矩阵怎么编?,希望写下每步的意思
1.输入矩阵a 2.用循环结构a for do 3.用循环结构把a用输出b 4.输出b矩阵 编一个转置MXN阶矩阵的程序 4 -5 6 12 4 0 3 0 1 22 9 变成 -5 1 15 3 15 4 10 6 22 4 12 9 10 原矩阵 转置后的矩阵 program trans(input,ou...

怎么写动态转移方程(pascal语言)
决策的目的就是“确定下一阶段的状态”,还是回到上例,从阶段2的B1状态出发有三条路,也就是三个决策,分别导向阶段3的C1、C2、C3三个状态,即D2(B1)={C1,C2,C3}。 有了决策,我们可以定义状态转移:动态规划中本阶段的状态往往是上一阶段和上一阶段的决策结果,由第k段的状态sk和本阶段的决策uk确定第k+1段...

计算机语言有哪几种
工业编程语言: A+ | Ada | 汇编语言| B | Brain *** | C | C++ | C++\/CLI| Cg | COBOL | Eiffel | Erlang | FORTRAN | IronPython | Java | JRuby | Jython | LISP | Oberon | Objective-C| Ocaml | Pascal | Perl | Powerbuilder | Python | QBASIC | R | REXX | Ruby | Self | Sm...

请程序高手用pascal语言为我解答骑士巡游和蛋糕问题
const dx:array[1..8] of integer=(1,-1,-2,-2,-1,1,2,2);dy:array[1..8] of integer=(2,2,1,-1,-2,-2,-1,1) ;var i,j,x,y,n,m,p:integer;board:array[-2..12,-2..12] of integer;a:array[1..100]of integer;procedure print;var i,j:integer;begin for i...

相似回答
大家正在搜