{ %fail } type T4Char = array[0..3] of char; begin writeln(T4Char(65)[0]); end.