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

обнови чтобы увидеть

alpha - имя

a - массив букв

Я вообще ноль в информатике, мне типо надо с именем Данил сделать, так где и что мне переписать?

varalpha:string;a: array [0 .. 26] of Char;begin alpha:='HELLO'; for var i:=1 to length(alpha) do begin    a[i]:=alpha[i];    write(Ord(a[i])+' '); endend.