zoukankan      html  css  js  c++  java
  • 二维数组

    program arrtest;
    
    {$APPTYPE CONSOLE}
    type
      matrix = array[1..5, 1..4] of Integer;
    
    var
      a: matrix;
      i, j: Integer;
    
    begin
      //数组赋值,按矩阵格式输出
      for I := 1 to 5 do
        for j := 1 to 4 do
        begin
          a[i, j] := i * j;
          if j = 4 then
            Writeln(a[i, j]: 4)
          else
            write(a[i, j]: 4);
        end;
      readln;
    end.

    效果如下:

    image

    之前学习APPLEM2的代码的过程中遇到好多基本的东西一知半解(比如用到的第三方控件,对那些控件的代码看的是一脸迷糊),为了系统学习一下,重新回头把C语言和PASCAL的基础知识学习了一遍,在这里开辟一个知识点的回顾,帮助自己复习一下,加深对代码的理解.之后将继续对APPLEM2的代码进行学习,本来想快点熟悉的,结果对照基础学习了一遍才发现,不是工科出身的我学习起来有一定难度,不过我不会放弃,知识都是一点一滴积累的,没有谁是天才,即便有,我也相信天才靠的是勤奋...

  • 相关阅读:
    yum 安装pip
    sed和awk用法
    awk删除最后一个字符
    shell读取文件内容并进行变量赋值
    git 添加、提交、推送
    git 本地代码冲突解决,强制更新
    sys系统模块
    os模块
    time-时间模块
    环境变量的使用
  • 原文地址:https://www.cnblogs.com/iicc/p/6522387.html
Copyright © 2011-2022 走看看