请解答此题,要详细步骤procedure foo(a,b,c:integer); begin if a>b then foo(c,a,b)else writeln(a,',',b,',',c)end;var a,b,c:integer;begin readln(a,b,c); foo(a,b,c);end.输入:2 1 3输出:谢谢楼上的,再foo(a,b,c)和foo(c,a,b)是
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/10 18:05:46
xKO@ǿne[lBJ^1AD#QHLTh˴e=N+m?3_Vst9|:tM*{r؛qD]ITdԠeWxE%&p