Wikioi 1007

Pascal程序：求解累积和超过k的最小项数

最新推荐文章于 2014-11-25 20:35:01 发布

原创最新推荐文章于 2014-11-25 20:35:01 发布 · 345 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#Wikioi

Wikioi 专栏收录该内容

13 篇文章

订阅专栏

var k,n:longint;

      sn:real;

begin

    readln(k);

    n:=0;

    sn:=0;

    repeat

        inc(n);

        sn:=sn+1/n;

    until sn>k;

    writeln(n);

end.

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

3dWS232

关注关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

专栏目录

wikioi 1230

06-07

wikioi1230程序！

wikioi 试题

01-27

wikioi 试题 1010 过河卒一道经典题，算混个分吧

参与评论您还未登录，请先登录后发表或查看评论

wikioi 1007 级数求和普及组 2002

wr_1737的专栏

11-29

1079

水题不解释啊#include #include #include #include using namespace std; int n,k; int main() { scanf("%d",&k); double ans=0.0; for(int i=1;;i++) { ans=ans+1.0/i; if(ans>k

【wikioi】1007 级数求和

iwtwiioi的专栏

10-20

1143

模拟即可 #include using namespace std; int main() { int k, n = 1; double sum = 0; cin >> k; while(1) { sum += double(1/double(n)); if(sum > k) break; n++;

wikioi 1017 乘积最大普及组 2000

wr_1737的专栏

12-01

576

http://wikioi.com/problem/1017/ 设有一个长度为N的数字串，要求选手使用K个乘号将它分成K+1个部分，找出一种分法，使得这K+1个部分的乘积能够为最大。同时，为了帮助选手能够正确理解题意，主持人还举了如下的一个例子：有一个数字串：312，当N=3，K=1时会有以下两种分法： 1) 3*12=36

7、8月刷题总结

08-28

258

准备开学了囧，7、8月刷题记录，以后好来复习，并且还要好好总结！大部分都是8月18日后刷的，那时候确实蛮拼的。数据结构： splay：【BZOJ】1503: [NOI2004]郁闷的出纳员（Splay）【BZOJ】1269: [AHOI2006]文本编辑器editor（Splay）【BZOJ】1507: [NOI2003]Editor（Splay） ...

[NOIP 2014复习]各大OJ刷题列表

某沙茶的OI代码库

09-14

2591

POJ BZOJ Wikioi

关于bzoj

weixin_30322405的博客

11-15

P1000：水一把 P1006:弦图完美消除序列，我用的MCS，在写此题前请先去看cdq有关弦图的ppt，因为，b的错，WA了会儿，真是忧伤…… P1007照斜率排序然后用stack维护可见直线序列插入的直线与top的焦点必须始终大于top与top-1的焦点否则top--①struct sort cmpbool cmp(const struct line &x,const str...

【水】noip2002普及级数求和

weixin_30480583的博客

09-19

248

为什么最近碰到的水题都是noip2002普及的啊。。。我保证我绝对没有无聊到去刷普及，这一定是wikioi的巧合。。。这题目水到我都不好意思丢blog了。。。可是实在没过高大上的题目啊。。哎。。蒟蒻无人权 1007 级数求和 2002年NOIP全国联赛普及组题目描述 Description 已知：Sn= 1＋1／2＋1／3＋…＋1／n。显然对于任意一个整数K...

ZOJ 题目分类，学校的一个巨巨做的。

自己选择的路，就算跪着也要走完。

11-25

964

DP: 1011 NTA 简单题 1013 Great Equipment 简单题 1024 Calendar Game 简单题 1027 Human Gene Functions 简单题 1037 Gridland 简单题

wikioi包 300个程序

03-15

【wikioi包 300个程序】是一款专门针对编程爱好者和竞赛选手设计的资源集合，包含了多种类型的编程挑战题目，旨在帮助用户提升编程能力，顺利通过各类竞赛，甚至晋升到省级竞赛队伍。这个压缩包中的每个文件代表一个...

wikioi一道带权并查集解题-奶牛的身高

11-07

wikioi一道带权并查集解题-奶牛的身高，记得一定要读完一整个案例数据后再输出blind哦

Wikioi 1022 覆盖

zxy981111的专栏

07-28

585

#include #include #include #include #include #include #include #include #include using namespace std; int n,m,k; bool map[10010]; int linky[10010],color[10010]; int vis[10010]; int T,ans,sum; bool f

Wikioi 1018 单词接龙

zxy981111的专栏

07-28

580

题目描述 Description 单词接龙是一个与我们经常玩的成语接龙相类似的游戏，现在我们已知一组单词，且给定一个开头的字母，要求出以这个字母开头的最长的“龙”（每个单词都最多在“龙”中出现两次），在两个单词相连时，其重合部分合为一部分，例如beast和astonish，如果接成一条龙则变为beastonish，另外相邻的两部分不能存在包含关系，例如at和atide间不能相

Wikioi 1012

zxy981111的专栏

07-28

568

var x,y,p,q,t,tt,s,i,j:longint; function gcd(a,b:longint):longint; begin if b=0 then gcd:=a else gcd:=gcd(b,a mod b); end; function gbs(a,b:longint):longint; begin gbs:=a*b div gcd(a,b); end; begin

Wikioi 1009

zxy981111的专栏

07-28

557

#include #include #include #define ULL unsigned long long using namespace std; char s[50]; int n,a,b,len; int mp[15][15]; void in() { cin>>s; cin>>n; len=strlen(s); while(n--){cin>>a>

Wikioi 1017 乘积最大

zxy981111的专栏

07-28

532

Description

Wikioi 1010

zxy981111的专栏

07-28

502

#include #include bool a[16][16]; int x,y,m_x,m_y,count; int DFS(int i,int j) { if(i { if(a[i][j])return 0; if(i==x&&j==y)count++; DFS(i+1,j); DFS(i,j+1); } return 0; } int main() { w

Wikioi 1014

zxy981111的专栏

07-28

496

#include using namespace std; int main() { int V,n,v[50],i,j,max; cin>>V>>n; int MAX=0,dp[50]; for(i=1;i<=n;i++) { cin>>v[i]; if(v[i]<=V)dp[i]=v[i]; else dp[i]=0; } for(i=n-1;i>=1;i--) {

Wikioi 1002

zxy981111的专栏

07-26

481

#include #include #include #include #include #include #include using namespace std; #define maxn 2600 #define INF 0xffffff int father[maxn]; struct Map { int x, y; }map[maxn]; struct node {