银叶草

摘要：题意根据电价规定，计算出应交的电费应该是多少。分析简单的数学问题，看懂题目就会做。vars,t:real;begin read(s);t:=0; if s<=150 then t:=s*0.4463 else if s<=400 then be... 阅读全文

posted @ 2017-02-22 16:24 银叶草阅读(103) 评论(0) 推荐(0) 编辑

摘要：题意小鱼给自己的游泳时间做了精确的计时（本题中的计时都按24小时制计算），它发现自己从a时b分一直游泳到当天的c时d分，请你帮小鱼计算一下，它这天一共游了多少时间呢？vara,b,c,d:longint;begin read(a,b,c,d); if b<... 阅读全文

posted @ 2017-02-22 15:56 银叶草阅读(224) 评论(0) 推荐(0) 编辑

摘要：题意已知一只签字笔的价格是1元9角，而班主任给小玉的钱是a元b角，求最多可以买几支笔分析简单的数学问题，数量=小玉的钱 div 1元9角vara,b:longint;begin read(a,b); a:=a*10+b; b:=19; writ... 阅读全文

posted @ 2017-02-22 15:38 银叶草阅读(149) 评论(0) 推荐(0) 编辑

摘要：题意n个同学站成一个圆圈，其中的一个同学手里拿着一个球，当老师吹哨子时开始传球，每个同学可以把球传给自己左右的两个同学中的一个（左右任意），当老师在此吹哨子时，传球停止，此时，拿着球没有传出去的那个同学就是败者。分析一个球只能从左边和右边传来所以 f[i,j]:=f[... 阅读全文

posted @ 2017-02-05 18:49 银叶草阅读(96) 评论(0) 推荐(0) 编辑

摘要：题意打印图案分析仔细看输出，理解题意，思路清晰就能做出这题。vari,j,k,a:longint;s:ansistring;p:array[0..9,1..5]of longint=((1,1,0,1,1),(0,2,0,2,0),(1,2,1,3,1),(1,2,1... 阅读全文

posted @ 2017-02-05 18:37 银叶草阅读(124) 评论(0) 推荐(0) 编辑

摘要：题意对于一系列比赛信息的输入（WL形式），输出正确的结果。分析如果理解了题目，那么就能做出这题。vari,n,x,y:longint;w:char;a:array[0..100000]of char;begin n:=0; repeat r... 阅读全文

posted @ 2017-02-05 18:21 银叶草阅读(123) 评论(0) 推荐(0) 编辑

摘要：题意请考虑一个由1到N（N=3, 4, 5 ... 9）的数字组成的递增数列：1 2 3 ... N。现在请在数列中插入“+”表示加，或者“-”表示减，“ ”表示空白(例如1-2 3就等于1-23)，来将每一对数字组合在一起（请不要在第一个数字前插入符号）。计算该... 阅读全文

posted @ 2017-02-05 17:28 银叶草阅读(265) 评论(0) 推荐(0) 编辑

摘要：题意从右边开始切下肋骨,每次还剩下的肋骨上的数字都组成一个质数,举例来说: 7 3 3 1 全部肋骨上的数字 7331是质数;三根肋骨 733是质数;二根肋骨 73 是质数;当然,最后一根肋骨 7 也是质数。 7331 被叫做长度 4 的特殊质数。写一个程序对给定的肋... 阅读全文

posted @ 2017-02-05 16:46 银叶草阅读(391) 评论(0) 推荐(0) 编辑

摘要：题意找出范围[a,b](5 0 do begin inc(s); t:=t div 10; end; work:=s;end;function ss(s:string):longint;varsz,i:longint;be... 阅读全文

posted @ 2017-02-05 16:31 银叶草阅读(244) 评论(0) 推荐(0) 编辑

摘要：题意给出N年的一个周期，要求计算1900年1月1日至1900+N-1年12月31日中十三号落在周一到周日的次数分析先算出当前月份的天数，再看有没有到13号，有的话就加次数。varx,m,y,d,i,n,j:longint;a:array[1..7]of longint... 阅读全文

posted @ 2017-02-04 21:49 银叶草阅读(158) 评论(0) 推荐(0) 编辑

csdn博客：https://blog.csdn.net/sslgz_yyc