Lib.nbdp.net
首页
试卷列表
OJ题库
搜索
登录
主页
题库
详解
不是VIP会员,不能显示答案
题目解答
题目:
1、program test1;
var a,b,n:longint;
begin
readln(n);
a:=0;
b:=0;
repeat
a:=a+1;
b:=b+a;
until b>=n;
writeln(a);
end.
输入1:
5
输入2:
50
输出:
3
10
考点:
0
分析:
解答:
1+2+3+...+x>n求X的值
评论:
老师:
0