ABAP选择结构自己做的练习题
ABAP选择结构自己做的练习题
- 身高预测
- 出租车计费问题
- BMI指数
- 判断天数
- 判断回文数
身高预测
每个人的身高与遗传、饮食习惯与体育锻炼等因素密切相关。设faHeight为父亲身高,moHeight为母亲身高,身高预测公式为:男性成人时身高=(faHeight + moHeight)×0.54;女性成人时身高=(faHeight×0.923 + moHeight)/2。
此外,如果喜爱体育锻炼,那么可增加身高2%;如果有良好的卫生饮食习惯,那么可增加身高1.5%。
从键盘输入用户的性别、父母身高、是否喜爱体育锻炼、是否有良好的饮食习惯等条件,利用给定公式和身高预测方法对身高进行预测。
代码如下:
PARAMETERS: sex TYPE c,faHeight TYPE p DECIMALS 2,moHeight TYPE p DECIMALS 2,isPhysic TYPE c,isGodiet TYPE c.DATA: height TYPE p DECIMALS 2.IF sex = 'M'.IF isPhysic = 'Y' AND isGodiet = 'Y'.height = ( faHeight + moHeight ) * '0.54' * '1.02' * '1.015'.WRITE:/ height.ELSEIF isPhysic = 'Y' AND isGodiet = 'N'.height = ( faHeight + moHeight ) * '0.54' * '1.02'.WRITE:/ height.ELSEIF isPhysic = 'N' AND isGodiet = 'Y'.height = ( faHeight + moHeight ) * '0.54' * '1.015'.WRITE:/ height.ELSE.height = ( faHeight + moHeight ) * '0.54'.WRITE:/ height.ENDIF.
ELSEIF sex = 'F'.IF isPhysic = 'Y' AND isGodiet = 'Y'.height = ( faHeight * '0.923' + moHeight ) / 2 * '1.02' * '1.015'.WRITE:/ height.ELSEIF isPhysic = 'Y' AND isGodiet = 'N'.height = ( faHeight * '0.923' + moHeight ) / 2 * '1.02'.WRITE:/ height.ELSEIF isPhysic = 'N' AND isGodiet = 'Y'.height = ( faHeight * '0.923' + moHeight ) / 2 * '1.015'.WRITE:/ height.ELSE.height = ( faHeight * '0.923' + moHeight ) / 2.WRITE:/ height.ENDIF.
ELSE.WRITE:/ '您输入的性别有误'.
ENDIF.
出租车计费问题
计费标准如下:起步价为5元,前2公里不计费;超过2公里但不超过10公里,按单程1.6元/公里计费;10公里以上,一律按单程1元/公里计费。实际行驶里程四舍五入取整后作为计算里程。当输入实际里程时,立即输出乘客应付的车费。
代码如下:
PARAMETERS: mile TYPE p DECIMALS 2.DATA: charge TYPE p DECIMALS 2,mileage TYPE i.mileage = mile. IF mileage <= 2.charge = 5.WRITE:/ '应付车费为:' , charge , '元'.
ELSEIF mileage > 2 AND mileage <= 10.charge = 5 + ( mileage - 2 ) * '1.6'.WRITE:/ '应付车费为:' , charge , '元'.
ELSEIF mileage > 10.charge = 5 + ( mileage - 2 ) * 1.WRITE:/ '应付车费为:' , charge , '元'.
ELSE.WRITE:/ '输入的里程数有误。'.
ENDIF.
BMI指数
体质指数(BMI)=体重(kg)/身高m2 (m)
代码如下:
PARAMETERS: weight(4) TYPE p DECIMALS 2,height(4) TYPE p DECIMALS 2.
DATA BMI TYPE p DECIMALS 1.
BMI = weight / height ** 2.
IF BMI < '18.5'.WRITE:/ '您的体重过轻,请多吃点哦!'.
ELSEIF BMI >= '18.5' AND BMI < 24.WRITE:/ '请继续保持您的体重!'.
ELSEIF BMI >= 24 AND BMI < 28.WRITE:/ '您已经开始偏胖了,请您注意运动!'.
ELSEIF BMI >= 28 AND BMI < 30.WRITE:/ '一度肥胖了,减肥吧!'.
ELSEIF BMI >= 30 AND BMI < 40.WRITE:/ '二度肥胖了,加油减肥吧!'.
ELSEIF BMI >= 40.WRITE:/ '三度肥胖了,去医院吧!'.
ENDIF.
判断天数
输入年月日,判断这是这一年的第几天。
代码如下:
PARAMETERS: year TYPE i,month TYPE i,day TYPE i.
DATA: num TYPE i.IF year mod 4 = 0 AND year mod 100 <> 0 OR year mod 400 = 0.CASE month.WHEN 1.num = day.WRITE:/ day.WHEN 2.num = 31 + day.WRITE:/ day.WHEN 3.num = 31 + 29 + day.WRITE:/ num.WHEN 4.num = 31 + 29 + 31 + day.WHEN 5.num = 31 + 29 + 31 + 30 + day.WRITE:/ num.WHEN 6.num = 31 + 29 + 31 + 30 + 31 + day.WRITE:/ num.WHEN 7.num = 31 + 29 + 31 + 30 + 31 + 30 + day.WRITE:/ num.WHEN 8.num = 31 + 29 + 31 + 30 + 31 + 30 + 31 + day.WRITE:/ num.WHEN 9.num = 31 + 29 + 31 + 30 + 31 + 30 + 31 + 31 + day.WRITE:/ num.WHEN 10.num = 31 + 29 + 31 + 30 + 31 + 30 + 31 + 31 + 30 + day.WRITE:/ num.WHEN 11.num = 31 + 29 + 31 + 30 + 31 + 30 + 31 + 31 + 30 + 31 + day.WRITE:/ num.WHEN 12.num = 31 + 29 + 31 + 30 + 31 + 30 + 31 + 31 + 30 + 31 + 30 + day.WRITE:/ num.WHEN OTHERS.WRITE:/ '输入的月份有误'.ENDCASE.
ELSE.CASE month.WHEN 1.num = day.WRITE:/ day.WHEN 2.num = 31 + day.WRITE:/ day.WHEN 3.num = 31 + 28 + day.WRITE:/ num.WHEN 4.num = 31 + 28 + 31 + day.WHEN 5.num = 31 + 28 + 31 + 30 + day.WRITE:/ num.WHEN 6.num = 31 + 28 + 31 + 30 + 31 + day.WRITE:/ num.WHEN 7.num = 31 + 28 + 31 + 30 + 31 + 30 + day.WRITE:/ num.WHEN 8.num = 31 + 28 + 31 + 30 + 31 + 30 + 31 + day.WRITE:/ num.WHEN 9.num = 31 + 28 + 31 + 30 + 31 + 30 + 31 + 31 + day.WRITE:/ num.WHEN 10.num = 31 + 28 + 31 + 30 + 31 + 30 + 31 + 31 + 30 + day.WRITE:/ num.WHEN 11.num = 31 + 28 + 31 + 30 + 31 + 30 + 31 + 31 + 30 + 31 + day.WRITE:/ num.WHEN 12.num = 31 + 28 + 31 + 30 + 31 + 30 + 31 + 31 + 30 + 31 + 30 + day.WRITE:/ num.WHEN OTHERS.WRITE:/ '输入的月份有误'.ENDCASE.
ENDIF.
判断回文数
一个5位数,判断它是不是回文数。即12321是回文数,个位与万位相同,十位与千位相同。
代码如下:
PARAMETERS: num TYPE i.
DATA: gewei TYPE i,shiwei TYPE i,qianwei TYPE i,wanwei TYPE i.gewei = num mod 10.
shiwei = num mod 100 div 10.
qianwei = num div 1000 mod 10.
wanwei = num div 10000.IF gewei = wanwei AND shiwei = qianwei.WRITE:/ num , '是回文数'.
ELSE.WRITE:/ num , '不是回文数'.
ENDIF.
ABAP选择结构自己做的练习题相关推荐
- C语言选择结构程序设计练习题-华氏温度转换成摄氏温度
原文地址:嗨客网 C语言选择结构程序设计练习题 描述 给出一个场景,和一个计算公式,根据公式将输入的华氏温度转换成摄氏温度.(谭浩强 C 语言 第三版 89 页第 4.9 题 ) 题目 输入一个华氏温 ...
- Java小白自学7:选择结构练习题
01: 使用if选择结构判断一个整数,属于哪个范围:大于0:小于0:等于0 public static void main(String[] args) {/*使用if选择结构判断一个整数是偶数还是奇 ...
- java选择结构练习题(if部分)
1: 使用if选择结构判断一个整数,属于哪个范围:大于0:小于0:等于0. import java.util.Scanner;public class IfElseDemo01 {public sta ...
- C#流程控制————选择结构
1.选择结构--if else if if else if 作用:用来处理多条件的区间性的判断 语法: if(判断条件) { 要执行的代码; }else if(判断条件) { 要执行的代码; } el ...
- 15天Python入门-3-流程控制-选择结构
15天Python入门-3-流程控制-选择结构 时代赋能 生命的意义是成为你自己 已关注 1 人赞同了该文章 设想一个场景,你需要控制机器人和顾客打招呼,假设机器人(在大多数情况下)能够判断出顾客的性 ...
- java中if结构用图表示_Java语法基础之选择结构的if语句、switch语句详解
[前言] 流程控制语句: 在一个程序执行的过程中,各条语句的执行顺序对程序的结果是有直接影响的.也就是说程序的流程对运行结果有直接的影响.所以,我们必须清楚每条语句的执行流程.而且,很多时候我们要通过 ...
- python中的选择结构语句是语句_python3控制语句---选择结构语句
python中的控制语句主要有if.if--else.if--slif--else.pass语句.其实python的控制语句与其他语言的控制语句工作原理基本一样.控制语句可以分为选择结构语句和循环结构 ...
- python基础第三章选择结构答案-零基础学Python--------第3章 流程控制语句
第3章 流程控制语句 3.1程序的结构 计算机在解决某个具体问题时,主要有3种情况,分别是顺序执行所有的语句.选择执行部分语句和循环执行部分语句.程序设计中的3种基本结构为顺序结构.选择结构和循环结构 ...
- python基础第三章选择结构答案-python3 学习笔记(二)选择结构、循环结构
python3 学习笔记 python 优雅 明确 简单 1.选择结构 (1)简单判断 if else 使用格式: if 条件: 表达式1 else: 表达式2 (2)多条件判断 elif 使用格式 ...
最新文章
- mysql学习【第10篇】:数据库之索引与慢查询优化
- ICCV‘21 Oral|拒绝调参,显著提点:检测分割任务的新损失函数RS Loss开源
- mysql数据库算法_数据库:MySQL索引背后的数据结构及算法原理【转】
- 巨人网络第三季度营收5.06亿元 净利润3亿元
- ios 友盟第三方登录遇到的各种坑。
- php在客户端禁用cookie时让session不失效的解决方法
- Promise API 简介
- java 模拟电梯_java实现的电梯模拟系统
- 能否利用Hadoop搭建完整的云计算平台
- 适合初学者 :用Google map street view api 实现批量下载谷歌地图街景 in python
- 日语入门选什么书好?
- CDH安装过程中出现:主机 cdh04 上的内存被调拨过度。总内存分配额是 4.0 艾字节 个字节,但是 RAM 只有 62.8 吉字节 个字节(其中的 12.6 吉字节 个字节是保留给系统使用的)。
- 运算符优先级及记忆口诀
- 关于CTF中脚本的编写及使用。ISCC之Retrieve the passcode
- Windows驱动的Checked (chk)和Free(fre)区别
- W: 校验数字签名时出错。此仓库未被更新,所以仍然使用此前的索引文件。GPG 错误:http://packages.ros.org/ros/ubuntu xenial InRelease: 下列签名无
- 在ISE下分析约束时序
- linux配置yum源
- Workspaces can only be enabled in private projects
- 在手机上安装Ubuntu(Termux)
热门文章
- python与excel常用的第三方库_Python读写Excel文件第三方库汇总
- 联通光猫虚拟服务器设置,光猫虚拟服务器设置
- 批量删除EXCEL里的软回车
- WORD 软回车(Shift + Enter)替换成硬回车(Enter)
- Kali 使用已破解的 BurpSuite 替换默认 BurpSuite
- Android手机获取运营商
- openwrt 认证收费_OpenWrt下进行标准802.1X认证
- CentOS 7 | 下载并安装yum
- DZ全站HTTPS可行,基于网上教程的修改
- 折叠屏手机密集轰炸,有人狂热有人Diss,你站谁?