ABAP-递归的简单例子

复制代码
 1 *求一个数的阶层
 2 REPORT y4_b4_test21.
 3 
 4 DATA:n TYPE i .
 5 
 6 n = 4 .
 7 
 8 PERFORM frm_jiecheng USING n .
 9 
10 WRITE n .
11 
12 FORM frm_jiecheng USING n  .
13 
14   DATA:n_1 TYPE i .
15 
16   n_1 = n - 1 .
17 
18   IF n = 1 .
19     n = 1 .
20   ELSE .
21     PERFORM frm_jiecheng USING n_1 .
22     n = n * n_1 .
23   ENDIF .
24 
25 ENDFORM .
复制代码
posted @   TigerMan  阅读(234)  评论(0)  编辑  收藏  举报
相关博文：
· ABAP-层次报表的实现程序例子
· ABAP-XML和内表相互转换程序例子
· 递归示例汇总（Excel函数集团）
· 递归示例-展开编号（Excel函数集团）
· 递归（二）
阅读排行：
· 阿里最新开源QwQ-32B，效果媲美deepseek-r1满血版，部署成本又又又降低了！
· AI编程工具终极对决：字节Trae VS Cursor，谁才是开发者新宠？
· 开源Multi-agent AI智能体框架aevatar.ai，欢迎大家贡献代码
· Manus重磅发布：全球首款通用AI代理技术深度解析与实战指南
· 被坑几百块钱后，我竟然真的恢复了删除的微信聊天记录！
点击右上角即可分享
微信分享提示
AI IDE Trae