În pascal vă rog,dacă mă poate ajuta cineva

program p1;
begin
writeln(ord('D'), ' ', ord('Z'), ' ', ord('R'));
end.