Em hiểu gì về đoạn chương trình sau

Em hiểu gì về đoạn chương trình sau :
a)  Var a array [1.......10] of real ;
b) Begin
               Writeln ('Nhap day so thuc:');
                For i:=1 to 10 do
                 Begin
               Write ('a[',i,'] = ' )
                Readln (a[i]);
      End.
c) Writeln ('In day cac phan tu:');
     For i:=1 to 10 do White (a[i]:5:2);writeln;
d) For i:=10 downto 1 to write (a[i]:5:2);writeln;
e) S:=0;
     For i:=1 to 10 do 'S:=S+a [i];
     Write ('S=',5:8:2),writeln; 
     Write ('S=',S/10: