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 wmi 取硬件信息

Delphi listbox用canvas属性绘图

Delphi guid单元

Delphi 将tbitmap与tgpimage转换

Delphi length 统计指定字符串的长度(即个数)

Delphi windowsapi: muldiv

Delphi 通过memorystream 传递image1数据

Delphi apihook createprocess

Delphi 使用钩子函数

Delphi 把整个窗体保存为图片的方法

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



打赏

取消

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

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

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

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

评论

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