RosettaCodeData/Task/Special-characters/Ada/special-characters-1.ada
2023-07-01 13:44:08 -04:00

6 lines
126 B
Ada

with Ada.Text_IO; use Ada.Text_IO;
procedure Test is
begin
Put ("Quote """ & ''' & """" & Character'Val (10));
end Test;