0

Pascal-算法-信号三角形

##知识: 信号三角形   1  2 3 4 5 6 7 8 9 每一行的个数 = 2 * 第几行(宽) – 1 ##过程: 设行为i,列为j ![](http://www.flayerveo.com/usr/uploads/2020/02/2217451593.png) ![](http://www.flayerveo.com/usr/uploads/2020/02/2303766645.png) :空格数,每行空格数=总行数依次递减 即 n-1 - 阅读剩余部分 -
0

Pascal-算法-数字矩阵

##知识: **inc两种用法: ** ```c 用法一: inc(integer) inc(a)等于a:=a+1; 例: i := 100; inc(i); 结果:i等于101 ``` ```c 用法二: inc(integer,integer) inc(a,b)等于a:=a+b; 例: i:=100; inc(i,20); 结果:i=120 ``` **dec:** 与inc相反,依次递减 **write:** write- 阅读剩余部分 -
0

Pascal-算法-质数

##知识: 素数:除了1和它本身不能被其他数整除 ##题目: 任意输入一个数,判断他是否是素数,是的话输出’T’,不是的话输出’F’ ##思路: 这里用除法或取模的思路,取模值需要为0,除法需要整除为1 ##过程: ![](http://www.flayerveo.com/usr/uploads/2020/02/4256952673.png) ![](http://www.flayerveo.com/usr/uploads/2020/02/41- 阅读剩余部分 -
0

Pascal-算法-穷举

##题目: 100元买100只鸡,公鸡小鸡母鸡都要有。公鸡5元1只,母鸡3元一只,小鸡1元3只。问应该各买多少只 ##输出: 每种买法各占一行,由3各数组构成,顺序为 公鸡数 母鸡数 小鸡数。 ,每个数字空格隔开 ##思路: 先用for选出所有鸡可以购买的所有可能数量即 for x:=1 to 最大值 因为题目说所有鸡都要买至少一个所以 如公鸡: 最大值=(100-1*母鸡价格+1*小鸡价格j)/公鸡价格 ##过程: ![](http://w- 阅读剩余部分 -
0

Pascal-算法-擂台法求最值

##知识: **read:**不同于readln,readln是一行一行输入即输入完一个数据后回车再输入一个,read是一次性在一行里输入完,每个数用空格隔开,如果要一次性输入多个数据时,一般用read比较方便。 ##题目: 得出一组数据中的最大数 **思路:** 一开始设置一个变量然后和其他数比较将大的值替换为这个变量里来 **过程:** ![](http://www.flayerveo.com/usr/uploads/2020/02/166050- 阅读剩余部分 -
0

Pascal-算法-累加求和

##题目: 1+2+3+........+n 过程: ![](http://www.flayerveo.com/usr/uploads/2020/02/3535873105.png) 结果: ![](http://www.flayerveo.com/usr/uploads/2020/02/3235964236.png) ##扩展 **求平方和:** ![](http://www.flayerveo.com/usr/uploads/2020/02/4- 阅读剩余部分 -
0

Pascal-算法-机器人行驶

##题目: 用readln(x) 来模拟检测过程,如果输入为0,即不断前进,如果输入其他值即停止 ##方法1: 过程: ![1581515325.png](http://www.flayerveo.com/usr/uploads/2020/02/686213913.png) 如果readln(x)在循环外部的话系统就会一直打印‘qianjin’,现在只有你输入任意一个值时才会进行下一次操作,所以这里当我们打印其他值时就结束循坏并在外部输出‘ting’ - 阅读剩余部分 -
0

Pascal-算法-倒数

##题目: 将一个数依次倒数下去 ##方法1: 过程: ![](http://www.flayerveo.com/usr/uploads/2020/02/796400205.png) 结果: ![](http://www.flayerveo.com/usr/uploads/2020/02/3750697954.png) ##方法2: ![](http://www.flayerveo.com/usr/uploads/2020/02/3081423321.- 阅读剩余部分 -
0

Pascal-算法-成绩选择

##题目: 输入一个学生的成绩,如果大于等于80输出”Good”,如果小于80大于等于60,输出”So so” 如果小于60,输出”bad” ##过程: ![](http://www.flayerveo.com/usr/uploads/2020/02/1793480589.png) 意思是 and 是将boolean值进行and但是这里给的是两个longint型 **运算优先级:** ```c 1级:not 2级:* / div mod and 3- 阅读剩余部分 -
0

Pascal-算法-分糖果

##题目: 有5个小朋友,编号为1,2,3,4,5,他们按照自己的编号顺序围坐在一张圆桌旁。他们身上都有若干个糖果,现在他们做一个分糖果游戏。从1号开始,将他们的糖果平均分成三份(如果有多余的,则他将多余的糖果给吃掉),自己留一份,其余两份分给他相邻的两个小朋友。接着2,3,4,5也这样做。问一轮后每个小朋友手上分别有多少糖果。 ##过程: ![](http://www.flayerveo.com/usr/uploads/2020/02/589576614.png)- 阅读剩余部分 -
0

Pascal-算法-求圆面积和周长

##知识: **const定义常量:**即定义一个默认值,常量:不会改变的量,固定样式不用跟数据类型 格式: ```c const x = ??; ``` **平方sqr():** 如sqr(要被平方的变量或值) **周长公式:** 2πr **面积公式:** πr² **writeln(x:y:z): ** y:场宽; z:保留位数(即小数后保留z位,一般用于科学技术转浮点表示) 场宽:x>1位时会自己扩展; 比如y是‘1234’ 那y:8就是‘- 阅读剩余部分 -
    页码:
ICP证: 浙ICP备2022036136号