不是VIP会员,不能显示答案

题目解答

题目:
program gao7_4;
 var x,y1,y2,y3:integer;
 begin
  readln(x);y1:=0;y2:=1;y3:=1;
  while y2<=x do
   begin
    y1:=y1+1;y3:=y3+2;y2:=y2+y3
    end;
   writeln(y1);
  end.
输入:23420
输出:153
考点:
分析:
解答:
评论:
老师: