Составьте программу ,которая выводит ** экран коды символов в слове BEBY.ABC Pascal

Question

Составьте программу ,которая выводит на экран коды символов в слове BEBY.
ABC Pascal

Answer 1

Var
    i: integer;
    s: string;

begin
    s := 'BEBY';
    for i := 1 to Length(s) do
        writeln(ord(s[i]));
end.