PUT(max,max2)
END
(2)输入三个正整数作为边长,判断该三条边构成的三角形是等边、等腰还是一般三角形。 解:如图:
PDL语言描述如下: GET(a,b,c)
IF (a+b>c and b+c>a and c+a>b) IF (a=b)
IF (a=c)
PUT(\等边三角形\ ELSE
PUT(\等腰三角形\ ENDIF ELSE
IF(a=c)
PUT(\等腰三角形\ ELSE
IF (b=c)
PUT(\等腰三角形\ ELSE
PUT(\一般三角形\ ENDIF ENDIF ENDIF
ELSE
PUT (\这不是一个三角形\ ENDIF
5、用PAD图描述下面问题的控制结构。
有一个表A(1)、A(2)、...A(n),按递增顺序排列。给定一个Key值,在表中用折半法查找。若找到,将表位置i送入x,否则将零送到x,同时将key值插入表中。 算法:
(1)置初值H=1(表头),T=N(表尾)。 (2)置i=[(H+T)/2](取整)。
(3)若Key=A(i),则找到,i送到x;若Key>A(i),则Key在表的后半部分,i+1送入H;若KeyT为止。 (4)查不到时,将A(i),...A(N)移到A(i+1)...A(N+1),Key值送入A(i)中。 解:如图所示:
6、一个正文文件由若干记录组成,每个记录是一个字符串,要求统计每个记录中空格字符的个数及文件中空格字符的总个数。要求输出数据格式是每复制一行字符串后,另起一行打印出这个字符串中的空格数,最后打印出文件空格的总个数,用Jackson方法设计该程序结构。