首页 > 试题广场 >

procedure foo(a, b, c : intege

[填空题] 
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
  read(a, b, c);
  foo(a, b, c);
end.

输入：3 1 2
输出：1
查看答案及解析
添加回答

这道题你会答吗？花几分钟告诉大家答案吧！

提交观点

问题信息

普及 Pascal 完善程序-Pascal 数学
上传者：牛客309901号
难度：
0条回答 382浏览

热门推荐

相关试题

扫一扫，把题目装进口袋

求职之前，先上牛客

扫描二维码，进入QQ群

扫描二维码，关注牛客公众号