delphi7中的数组和记录类型

program Project1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
{ 基本语法学习 }
{ 数组类型}
type
  TArr = array[0..10,0..9] of Integer;
  {定义一个记录型}
  Trec = record
  name:string[10];
  sex:string[2];
  age:Integer;
  end;
var
  arr:TArr;
  rec:Trec;
  r,c:Integer;
begin
  for R:= 0 to 10 do
    for C:= 0 to 9 do
      begin
      arr[R][C]:=R*10+C;
      Writeln('arr[',R,'][',C,'] = ',arr[r][c]);
      end;
  rec.name := 'peixiaobi';
  rec.sex := '男';
  rec.age := 23;
  Writeln('rec里面的内容是:',rec.name,rec.sex,rec.age);
  Readln;
end.