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.