pascal多重循环:A、B两个自然数的和、差、积、商四个数加起来等于243,求A、B两数.

天边的云1397 1年前 已收到2个回答 举报

AA太阳黑子 幼苗

共回答了15个问题采纳率:66.7% 举报

程序如下:
var a,b:longint; //两个数 a,b直接做循环变量
begin
for a:=1 to 243 do //因为a*b要小于等于243 所以没必要超过它
for b:=1 to 243 do //双重循环 同上
if (a mod b=0)and((a+b)+(a-b)+(a*b)+(a div b)=243) //要(a mod b=0)判断是否整除
then writeln(a:5,b:5); //如满足条件则打印
end.

1年前

5

西门吹水007 幼苗

共回答了6个问题 举报

24 8
54 2

1年前

1
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 18 q. 0.032 s. - webmaster@yulucn.com