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

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