问两道PASCAL问题

1.由五个字符组成一个字符串，规定前四个字符为小写字母，第五个字符为数字，问有多少种排列方法。
2、类型定义type ren='A'..'F';，用A至F表示6个人,输出6个人相互握手的各种情况，并统计握手的次数。

越简单越好！谢谢(最好别用数组)
每两个人都要握手
请给出程序源代码(最好带注释)

1
26*26*26*26*10
2
没用到构造类型ren;
program cs;

var

n:integer;
i,j:integer;
begin
for i:=1 to 5 do
begin
for j:=i+1 to 6 do
begin
writeln(chr(65+i-1),'<-->',chr(65+j-1));
inc(n);
end;
end;

writeln(n);

end.
思路很简单，两层循环，1分别和23456握手，2再和3456握手，n是总握手次数。

1
26*26*26*26*10
2
program woshou;
var
begin
a:='ABCDEF';tol:=0;
for i:=1 to 5 do
for j:=i+1 to 6 do
begin
writeln(a[i],'与',a[j]);
tol:=tol+1;
end;
writeln(tol);
end.

1
26*26*26*26*10
2
没用到构造类型ren;
program cs;

var

n:integer;
i,j:integer;
begin
for i:=1 to 5 do
begin
for j:=i+1 to 6 do
begin
writeln(chr(65+i-1),'<-->',chr(65+j-1));
inc(n);
end;