作业帮 > 综合 > 作业

用pascal语言中的if语句解决一下几个问题。

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/07/08 22:06:54
用pascal语言中的if语句解决一下几个问题。
1.输入整数a和b,如果a 能被b整除,就输出算式和商,否则输出算式、整数商和余数。
2.输入两个字符,若这两个字符之差为偶数,则输出它们的后继字符,否则输出它们的前趋字符。这里的前趋和后继是指输入的两个字符中,较小字符前面的和较大字符后面的那个字符。
3.输入任意大小的三个整数,判断其中是否有两个奇数一个偶数。若是,则输出“YES”,不是则输出“NOT” (要求用条件表达式进行判断,使用if语句)
4.输入某个点A的平面坐标(x,y),判断(输出)A点是在圆内、圆外还是在圆周上,其中圆心从标为(2,2),半径为1 。
5、题目:企业发放的奖金根据利润提成。利润(I)低于或等于10万元时,奖金可提10%;利润高于10万元,低于20万元时,低于10万元的部分按10%提成,高于10万元的部分,可可提成7.5%;20万到40万之间时,高于20万元的部分,可提成5%;40万到60万之间时高于40万元的部分,可提成3%;60万到100万之间时,高于60万元的部分,可提成1.5%,高于100万元时,超过100万元的部分按1%提成,从键盘输入当月利润I,求应发放奖金总数?
用pascal语言中的if语句解决一下几个问题。
1.要确认A能不能被B整除,只要A除B的余数=0,那么他就能被B整除。否则就输出A,除号,B,等号,商(用整除函数DIV),再用A-B*商。程序:Var a,b:integer;Begin Readln(a,b); If a mod b=0 then Write(a,'/',b...