作业帮将下列代数式改写成Free Pascal表达式 （1）(x+y)(x-y) （2）b
来源：学生作业帮助网 编辑：作业帮 时间：2024/07/12 23:26:59
x){Ɏ ӟ^lꆧ{Mm泎 nE
ɉ9/xo PR{:5*+55*t+5A"F@$"}j_`gCu!
JҜ *h5YU$A i%)
D5+1%'O( 5($(R\XQ *5rP
,
-*-wӝMtkaˍy:0wZ9Tå Va" 85
将下列代数式改写成Free Pascal表达式 （1）(x+y)(x-y) （2）b
将下列代数式改写成Free Pascal表达式 （1）(x+y)(x-y) （2）b
将下列代数式改写成Free Pascal表达式 （1）(x+y)(x-y) （2）b
(x+y)(x-y)
x,y,result:real
...
result:= (x+y)*(x-y);
...
var x,y:real
begin
readln(x,y);
writeln(sqr(x)-sqr(y));
readln;readln;
end.
x*x-y*y 根据平方差公式
var ans,x,y:real;
begin
readln(x,y);
ans:=(x+y)*(x-y);
end.