程序设计 甲乙丙丁四人有糖若干块,甲拿出一些给另外三人,是他们三人的糖数加倍;乙拿出一些给另外三人,也是他们三人的糖数加倍,丙丁也照此办理,此时甲乙丙丁四人各有16块,编程求出四
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/23 16:07:57
程序设计 甲乙丙丁四人有糖若干块,甲拿出一些给另外三人,是他们三人的糖数加倍;乙拿出一些给另外三人,也是他们三人的糖数加倍,丙丁也照此办理,此时甲乙丙丁四人各有16块,编程求出四
程序设计
甲乙丙丁四人有糖若干块,甲拿出一些给另外三人,是他们三人的糖数加倍;乙拿出一些给另外三人,也是他们三人的糖数加倍,丙丁也照此办理,此时甲乙丙丁四人各有16块,编程求出四个人开始各有多少块糖
程序设计 甲乙丙丁四人有糖若干块,甲拿出一些给另外三人,是他们三人的糖数加倍;乙拿出一些给另外三人,也是他们三人的糖数加倍,丙丁也照此办理,此时甲乙丙丁四人各有16块,编程求出四
设甲乙丙丁为x,y,z,p,手工解得,x+y+z+p=16*4,x最后为8x-8y-8z-8p=16,联立解得x,再由(3y-p-x-z)*4=16,4*(-x-y+7z-p)=16,-x+15z-y-p=16,最后编程接一个三元一次方程组即可.
program tang;
type t=arry[1..4]of real;
var a,b,c,n1,n2:array[1..4]of real;{记录三个方程的系数}
procedure xiao(m,n:t;var p:k){m n加减消元 消去一个未知数}
var i:integer;
begin
for i :=1 to 3 do
begin
p[i]:=a[i+1]/a[1]-b[i+1]/b[1];
end;
end;
begin
xiao(a,b,n1);
xiao(b,c,n2);
end.
后面就用一般的二元一次方程求解了