Составить программу по обработке символьных и строковых типов данных

[Регина2]

Вывести прописные буквы лат.алфавита в следующем виде:
A
BB
CCC
DDDD
..........
ZZZZ....ZZZZ(26 символов)

[Mad_Cat]

pascal

for i:=0 to 25 do
begin
for j:=1 to i+1 do
write(chr(i+ord('A')));
writeln;
end;