pascal 已知一个6*6的矩阵,把矩阵两条对角线上的元素加上10,然后输出这个新矩阵.

来源：学生作业帮助网编辑：作业帮时间：2024/04/28 00:29:45

pascal 已知一个6*6的矩阵,把矩阵两条对角线上的元素加上10,然后输出这个新矩阵.
pascal 已知一个6*6的矩阵,把矩阵两条对角线上的元素加上10,然后输出这个新矩阵.

pascal 已知一个6*6的矩阵,把矩阵两条对角线上的元素加上10,然后输出这个新矩阵.
program juzheng;
var a:array[1..6,1..6]of integer;x:string;f:text;
b,c:integer;
begin
writeln('shurudizhi,eg."a.txt"');
readln(x);
assign(f,x);
reset(f);
for b:=1 to 6 do
for c:=1 to 6 do
read(f,a[b,c]);
close(f);
writeln('shurudizhi,eg."a.txt"');
readln(x);
assign(f,x);
rewrite(f);
for b:=1 to 6 do
begin
a[b,b]:=a[b,b]+10;
c:=7-b;
a[b,c]:=a[b,c]+10;
end;
for b:=1 to 6 do
begin
for c:=1 to 6 do
write(f,a[b,c]);
writeln(f);
end;
close(f);
end.

pascal 已知一个6*6的矩阵,把矩阵两条对角线上的元素加上10,然后输出这个新矩阵. c++ 已知一个6*6的矩阵（方阵）,把矩阵二条对角线上的元素值加上10,然后输出这个新矩阵.已知一个6*6的矩阵（方阵）,把矩阵二条对角线上的元素值加上10,然后输出这个新矩阵.另外一题：给 pascal的蛇形矩阵,设有一个n*n的矩阵（0＜n＜50）用pascal语言怎么编? 螺旋矩阵的三种算法 Pascal 螺旋矩阵的三种算法 Pascal matlab合并矩阵把两个3×3的矩阵合成一个3×6的矩阵怎么操作 pascal语言：输入一个三行四列的数据区（矩阵）,变成四行三列的数据区（矩阵） 2007 矩阵取数把不用高精度的程序发给我好么.今天6点以前.我会尽我所能多给分的pascal语言.c++我看不懂.NOIP2007提高组复赛第三题. 一个未知矩阵与一个已知矩阵的积是已知矩阵,怎么求未知矩阵请教几道简单的MATLAB程序设计题目1.生成一个7*7的pascal矩阵A,取A的第1,3,5行和5,6,7列位置上的元素构成矩阵B,删除矩阵A的第1,2,3,4行和4,5,6,7列构成矩阵C,求D=B-1*C2.编制一求素数的函数文件程序, Wolfram Mathematica 如何把数字矩阵生成一个变量矩阵?请问,如何把数字矩阵生成一个变量矩阵?使变量的序号与数字矩阵一一对应.例如：输入数字矩阵：2,2,3,4,61,1,2,6,64,5,6,3,3输出变量矩阵：x2,x2,x 急求free pascal错误表本人急需要free pascal错误表,一定是要带中文的,所用的free pascal版本为1.0.6,一定要是free pascal,而不是turbo pascal或者其他的求几道pascal题目的解法1.数字矩阵：输入一个数字你,输出一个数字矩阵,例如：输入4,则输出 1234 2341 3412 41232.四位数黑洞6174 把一个四位数的四个数字由小至大排列,组成一个新数,又由大至怎样把一个矩阵表示为初等矩阵的乘积 matlab里可不可以设一个矩阵,已知行数和列数,等待输入,把输入的矩阵赋值给这个矩阵? 矩阵乘法C＝A×B1 2 5 10 1 2 0 A=3 4 6 B= 8 3 4 77 5 6 9要把C输出来.用for语句循环嵌套,用pascal 怎样把一个已知的三阶矩阵化为约当标准型 matlab中怎么把一个矩阵分解为一个矩阵和另一个矩阵逆的乘积?