- 博客(19)
- 资源 (4)
- 收藏
- 关注
原创 FreePascal及Guide下载地址
Guide下载地址http://download.noi.cn/T/noi/GUIDE-1.0.2-windows(jt).rarFreePascal下载地址http://sourceforge.net/projects/freepascal/files/Win32/2.6.4/fpc-2.6.4.i386-win32.exe/download
2015-10-08 15:59:21 1390
原创 信息学奥林匹克竞赛-ISBN号码
每一本正式出版的图书都有一个ISBN号码与之对应,ISBN码包括9位数字、1位识别码和3位分隔符,其规定格式如“x-xxx-xxxxx-x”,其中符号“-”就是分隔符(键盘上的减号),最后一位是识别码,例如0-670-82162-4就是一个标准的ISBN码。ISBN码的首位数字表示书籍的出版语言,例如0代表英语;第一个分隔符“-”之后的三位数字代表出版社,例如670代表维京出版社;第二个分隔符后的
2015-10-29 16:48:00 609
原创 信息学奥林匹克竞赛-统计单词数
一般的文本编辑器都有查找单词的功能,该功能可以快速定位特定单词在文章中的位置,有的还能统计出特定单词在文章中出现的次数。 现在,请你编程实现这一功能,具体要求是:给定一个单词,请你输出它在给定的文章中出现的次数和第一次出现的位置。注意:匹配单词时,不区分大小写,但要求完全匹配,即给定单词必须与文章中的某一独立单词在不区分大小写的情况下完全相同(参见样例1 ),如果给定单词仅是文章中某一
2015-10-29 16:43:38 507
原创 信息学奥林匹克竞赛-你的飞碟在这儿
众所周知,在每一个彗星后都有一只UFO。这些UFO时常来收集地球上的忠诚支持者。不幸的是,他们的飞碟每次出行都只能带上一组支持者。因此,他们要用一种聪明的方案让这些小组提前知道谁会被彗星带走。他们为每个彗星起了一个名字,通过这些名字来决定这个小组是不是被带走的那个特定的小组(你认为是谁给这些彗星取的名字呢?)。关于如何搭配的细节会在下面告诉你;你的任务是写一个程序,通过小组名和彗星名来决定这个小组
2015-10-29 16:07:06 435
原创 小鱼的游泳时间
伦敦奥运会要到了,小鱼在拼命练习游泳准备参加游泳比赛,可怜的小鱼并不知道鱼类是不能参加人类的奥运会的。这一天,小鱼给自己的游泳时间做了精确的计时(本题中的计时都按24小时制计算),它发现自己从a时b分一直游泳到当天的c时d分,请你帮小鱼计算一下,它这天一共游了多少时间呢?小鱼游的好辛苦呀,你可不要算错了哦。输入格式:一行内输入4个整数,分别表示a,b,c,d。输出格式:一行内输出2
2015-10-28 16:56:47 2509
原创 信息学奥林匹克竞赛-统计最长天数
炎热的夏日,KC非常的不爽。他宁可忍受北极的寒冷,也不愿忍受厦门的夏天。最近,他开始研究天气的变化。他希望用研究的结果预测未来的天气。经历千辛万苦,他收集了连续N(1现在,他想知道最高气温一直上升的最长连续天数。输入格式:第1行:一个整数N。1第2行:N个空格隔开的整数,表示连续N天的最高气温。0输出格式:第1行:一个整数,表示最高气温一直上升的最长连续天数
2015-10-27 16:05:58 1180
原创 信息学奥林匹克竞赛-相邻两数最大和
寻找相邻两个数,使得这两个数的和最大,输出这两个数的和以及这两个数所在位置vara:array[1..10] of longint=(5,-2,6,3,-1,18,-5,1,8,4);max,pos,i:longint;begin max:=a[1]+a[2]; pos:=1; for i:=1 to 9 do begin if a[i]+a[i+1]>max th
2015-10-22 16:36:06 362
原创 冒泡排序和选择排序
vari,j,t,max,min,pos:longint;a:array[1..10] of longint=(20,14,21,4,7,12,17,30,25,36);procedure BubbleSort;begin for i:=1 to 9 do begin for j:=1 to 10-i do begin if a[j]>a[j+1] then be
2015-10-21 16:36:23 315
原创 CCF NOIP2015赛区复赛通知
1、复赛选手名单:经中国计算机学会(CCF)批准,上海赛区进入复赛的名单如下:提高组 普及组 小学组请选手和指导教师仔细核对自己的信息,更正信息请发wushenguang@sina.com邮箱 2、复赛时间:提高组:11月7日(周六)、8日(周日)上午8:30至12:00竞赛。普及组:11月7日(周六)下午14:30至18:00竞赛。小学组:11月29日(周
2015-10-16 14:47:06 2444
原创 信息学奥林匹克竞赛-Pascal过程与函数
其中IsPrime1是过程,没有返回值,IsPrime2是函数,有返回值。varn,i:longint;procedure IsPrime1(number:longint);begin for i:=2 to trunc(sqrt(number)) do begin if number mod i=0 then begin writeln('false');
2015-10-15 16:36:17 467
原创 二分查找
vara:array[1..10] of longint=(3,5,13,14,18,23,26,28,39,50);low,high,mid,target:longint;begin low:=1; high:=10; target:=115; repeat mid:=(low+high) div 2; if a[mid]<target then begin lo
2015-10-14 15:17:45 285
原创 信息学奥林匹克竞赛-打印图形
vari,j:longint;begin for i:=1 to 10 do begin write('':20-2*i); for j:=1 to 10 do write('@'); writeln; end; readln;end.vari,j:longint;begin for i:=1 to 9 do begin write(
2015-10-14 12:39:57 475
转载 通过金矿模型介绍动态规划
对于动态规划,每个刚接触的人都需要一段时间来理解,特别是第一次接触的时候总是想不通为什么这种方法可行,这篇文章就是为了帮助大家理解动态规划,并通过讲解基本的01背包问题来引导读者如何去思考动态规划。本文力求通俗易懂,无异性,不让读者感到迷惑,引导读者去思考,所以如果你在阅读中发现有不通顺的地方,让你产生错误理解的地方,让你难得读懂的地方,请跟贴指出,谢谢! ----第一节
2015-10-14 11:35:01 512
原创 信息学奥林匹克竞赛-Pascal的多种退出语句用法
1、break 是用来退出其所在的循环语句 即 :不论在任何一个循环语句中 执行了 break 的话, 马上退出这个语句。相当于 :goto这一层循环语句 最末尾一句的下一句。例如:vari:integer;beginfor i := 1 to 10 dobegin writeln(i);{1} break; writeln(i+1);end;readln
2015-10-14 11:24:55 681
原创 Larazus开发计算器
unit Unit1;{$mode objfpc}{$H+}interfaceuses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,Math;type { TForm1 } TForm1 = class(TForm) Button1: TButton;
2015-10-13 16:53:04 682
原创 关于举办第十五届“西部杯”上海市青少年计算机应用操作竞赛规程
关于举办第十五届“西部杯”上海市青少年计算机应用操作竞赛规程一、 竞赛宗旨“西部杯”上海市青少年计算机应用操作竞赛是经上海市教育委员会批准的信息技术学科应用操作类竞赛项目。竞赛旨在为本市信息技术特长学生搭建学习、交流、展示信息技术能力的平台,考核参赛学生的信息技术应用实践能力,选拔信息技术特长学生。通过竞赛活动,引领青少年学生学习先进的信息技术,提高信息素养,培养出适应信息时代发展
2015-10-13 15:38:14 2390
原创 2015年信息学奥林匹克联赛-复赛流程
复赛流程日期时间任务备注10月12日-31日全天复赛网上报名(初赛后10天内复赛报名)(已有账号用户可直接报名;新用户注册)1)10月12日-13日特派员报名。2)10月14日-17日分赛区负责人报名,特派员审核报名。2)10月18
2015-10-12 09:35:48 1194
原创 Pascal过程
Pascal中,使用的程序关键字定义一个过程。一个过程定义的一般形式如下所示procedure name(argument(s): type1, argument(s): type 2, ... ); begin end;参数: 参数建立的调用程序和程序标识符之间的联系,也被称为形式参数。参数在程序的规则和函数是一样的。局部声明: 局部声明标签,
2015-10-08 16:45:03 1069
原创 纪念品分组
纪念品分组 元旦快到了,校学生会让乐乐负责新年晚会的纪念品发放工作。为使得参加晚会的同学所获得 的纪念品价值相对均衡,他要把购来的纪念品根据价格进行分组,但每组最多只能包括两件纪念品, 并且每组纪念品的价格之和不能超过一个给定的整数。为了保证在尽量短的时间内发完所有纪念品,乐乐希望分组的数目最少。 题目描述 你的任务是写一个程序,找出所有分组方案中分组数最少的一种,输出最少
2015-10-08 16:09:22 2176
EditPlus绿色破解版
2011-10-19
程序员考试2004~2010(全)真题附答案解析
2011-10-09
数据结构算法与应用——C++语言描述英文
2011-10-07
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人