楼主: erdongchen1985
1414 0

[程序分享] SAS编写九九乘法表(上三角形,下三角形,上次三角形,下次三角形) [推广有奖]

  • 0关注
  • 0粉丝

高中生

20%

还不是VIP/贵宾

-

威望
0
论坛币
974 个
通用积分
2.0103
学术水平
0 点
热心指数
0 点
信用等级
0 点
经验
560 点
帖子
11
精华
0
在线时间
9 小时
注册时间
2020-1-2
最后登录
2020-11-17

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
SAS编写九九乘法表,四种形式,上三角形、下三角形、上次三角形、下次三角形。
data _NULL_;
file print;
do i=1 to 9;
   do j=1 to i;
   k=i*j;
      str=trim(left(i)) || '*' || trim(left(j)) || '=' || left(k);
      put #i @ (8*j) str  @;
   end;
end;
run;      
data _NULL_;
file print;
do i=1 to 9;
   do j=i to 9;
      k=i*j;
      str=trim(left(i)) || '*' || trim(left(j)) || '=' || left(k);
      put #i @ (8*j) str @ ;
   end;
end;
run;                                
data _NULL_;
file print;
do i=1 to 9;
   do j=1 to i;
      k=i*j;
      str=trim(left(i)) || '*' || trim(left(j)) || '=' || left(k);
      put #i @ (80-8*j) str @ ;
   end;
end;
run;                                
data _NULL_;
file print;
do i=1 to 9;
   do j=9 to i by -1;
      k=i*j;
      str=trim(left(i)) || '*' || trim(left(j)) || '=' || left(k);
      put #i @ (80-8*j) str @ ;
   end;
end;
run;           


二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:三角形 乘法表 print left trim

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群

京ICP备16021002-2号 京B2-20170662号 京公网安备 11010802022788号 论坛法律顾问:王进律师 知识产权保护声明   免责及隐私声明

GMT+8, 2024-9-21 09:01