delphi命令行窗口实现9*9乘法表


本文整理自网络,侵删。

 
var i,j :Integer ;
begin
      for i :=1 to 9 do
      begin
        for j := 1 to i do
          write(i*j : 3);
          writeln;
      end ;
         readln;
end.
 代码含义:
var i,j :Integer ; 定义两个变量i,j为integer类型
begin  end表示程序开始结束代码块。
双重循环第一层表示输出行,从1行到9行分别输出1到9

相关阅读 >>

Delphi xe 10.2.1 fmx平台 在图片上写字方法

Delphi idhttp的用法

Delphi如何在资源管理器中定位文件

Delphi idhttp post json 上传 php 接收

Delphi 控制鼠标按坐标点击

firemonkey使用android的路径信息

Delphi输入字符与tlistbox项目匹配

Delphi xe2和xe3开发的程序中加入管理员权限申请

Delphi 判断字符串是否为纯数字组合

Delphi 2009 之 tcategorypanelgroup[2]: headeralignment、gradientdirection

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...