回 帖 发 新 帖 刷新版面

主题:出个小题目,来者加分

用递归的方法求1+2+3+...+100的值[em12]

回复列表 (共23个回复)

21 楼

被循环+递归淹没了~~~

22 楼

program xx;
 function add(x):integer;
 begin
  if x=1 then add:=1 else add:=x+add(x-1);
 end;
begin
 writeln(add(100));
end.

很简单


23 楼

这坟挖的~~~~

我来回复

您尚未登录,请登录后再回复。点此登录或注册