starbound怎么在月球:用PASCAL解决一道题目,有点难

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/04 18:31:35
题目:
任意输入一个整数为N位数(N需要大于等于0少于等于100,当不符合条件时,要求重新输入,直到符合条件为止),将整数中的数字倒序输出.
过程A:随机产生一个整数M(0=<M=<100),判断M与N是否相等.
若M=N,重新产生一个条件相符的随机数直到M不等于N.
过程B:输入一个字符为'S'或'B',当输入的字符不是'S'或'B'要求重新输入
1)当输入字符'B'时,若M比N大,输出'*' ;否则输出'-',程序结束.
2)当输入字符'S'时,若M比N少,输出'*' ;否则输出'-',程序结束.
返回过程A

你自己不是都把算法都说了
这个其实不难的 前面用一个 while 语句判断下N
倒序输出用到设变量 from...to循环语句,循环体内要把整数去 mod 10 ,还有整除10的运算,然后一个个转化成字符型,也可以在循环开始的时候把整数先转化成字符串型,然后同样利用循环一个个字符输出。
过程A:随机数用random()函数产生,用if语句判断M是否=N。
过程B:用case .. of 语句
'b':........
's':...........
调用A过程

基本思路都说 总不能帮你全部说出来, 这就没意思了
你自己努力下