- 博客(6)
- 资源 (4)
- 收藏
- 关注
原创 全国青少年信息学奥林匹克竞赛培训---计算星期几
var i:integer;var days:integer;var day,month,year:integer;function isleapyear(x:integer):boolean;begin if (x mod 4=0) and (x mod 100 <>0) then isleapyear:=true else begin if x m
2012-12-24 22:10:27 398
原创 全国青少年信息学奥林匹克竞赛培训---pascal版“四皇后问题”
uses crt;var a:array[1..4,1..4]of char;procedure init;var i,j:integer;begin for i:=1 to 4 do begin for j:=1 to 4 do a[i][j]:='*'; end;end;procedure print;var i,j:integer;
2012-12-22 18:58:39 373
原创 全国青少年信息学奥林匹克竞赛培训---pascal基础(3)顺序结构
顺序结构程序设计到目前为止,我们可以用读、写语句和赋值语句编写一些简单的程序。通过阅读这些程序,可以逐步熟悉pascal程序的编写方法和应遵循的规则,为以后各章的学习打基础。 例6 试编一程序,输入一梯形的上底、下底、高, 求该梯形的面积。 分析: 整个程序分为三段:输入、计算、输出。程序中用a,b,h三个变量分别存放梯形的上、下底与高,S存放面积。 要而使用这些变量都要先说明,程序的执行部分
2012-12-20 19:56:16 708
原创 全国青少年信息学奥林匹克竞赛培训---例题
习题1.1 模仿例题编程1. 加法计算器:编程由键盘输入两个整数a和b,计算出它们的和并输出到屏幕上。2.某梯形的上底、下底和高分别为8,12,9,求该梯形的面积。3. 求边长为5.6 的正立方体表面积。4. 已知图园柱体的高为12,底面园的半径为7,求园柱体表面积。5. 计算某次考试语文、数学、英语和计算机等四科的总成绩与平均成绩。(请用输入语句从键盘输入各科成绩分)
2012-12-20 19:21:05 525
原创 全国青少年信息学奥林匹克竞赛培训---pascal基础(2)常量及变量的赋值
(一)常量定义符号常量的一般格式:CONST =说明:常量说明部分以关键字const开头, 后面的标识符为常量标识符,其中"="号后的常量为整数、实数、字符、 字符串(字符、字符串常量在后面章节中将作介绍)。而且,在常量说明部分可以将几个常量说明成符号常量,共用一个关键字"const"。const PI=1;var r:integer ;//圆的半径var c:re
2012-12-20 19:18:24 735
原创 全国青少年信息学奥林匹克竞赛培训---pascal基础(1)程序框架
任何程序设计语言都有着一组自己的记号和规则。PASCAL语言同样必须采用其本身所规定的记号和规则来编写程序。尽管不同版本的PASCAL语言所采用的记号的数量、形式不尽相同,但其基本成分一般都符合标准PASCAL的规定,只是某些扩展功能各不相同罢了。下面我们首先来了解Pascal语言的程序基本结构。为了明显起见先举一个最简单的PASCAL程序例子:var r:integer ;//圆的半径
2012-12-20 18:55:25 793
EditPlus绿色破解版
2011-10-19
程序员考试2004~2010(全)真题附答案解析
2011-10-09
数据结构算法与应用——C++语言描述英文
2011-10-07
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人