大家帮我看看这Pascal的程序为什么会输出负数的?program a13;var a,b,c,d:integer;e:real;beginreadln(a,b,c);d:=a;while not((a mod d=0)and(b mod d=0)and(c mod d=0)) do d:=d-1;e:=a*b*c/d/d;writeln(d,' ',e:0:2)readln;end.我输入82 46 98,
来源:学生作业帮助网 编辑:作业帮 时间:2024/09/02 23:21:03
xn@_eohơ@ν֢H 5WJRJ"Ҵ@&ER#evmWئ.rN3|_Ƶh&|δlH&7[0*`swߚS6z)-Db+#8iUԼ+jRWIQɪ-j!/%d(;/EiJ(DV"D삗0%t-d5(UvBE&/TTF@;KYDq %d'3f4q$!'LH0f:5=L;VUf,o={1,Hb<.Cㅗ1ZgQhOj]]@
>LE˙Y0&ɡ=~ڼ;dF?u13k@9UN НѺ!mvh]