var
a,b:integer;
begin
for a:=1 to 16 do
for b:=1 to 16 do
if a mod b=0 then
if (a*b+a div b+a+b+1)=243 then writeln(a,b);
readln;
end.
绝对好用!
pascal程序 a,b两个自然数的和、差、积、商四个数加起来等于243,求a,b两数.
var
a,b:integer;
begin
for a:=1 to 16 do
for b:=1 to 16 do
if a mod b=0 then
if (a*b+a div b+a+b+1)=243 then writeln(a,b);
readln;
end.
绝对好用!