首页 > 试题广场 >

PROGRAM GAO7_4; VAR X,Y1,Y2,

[填空题]
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    输出: 1

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