RosettaCodeData/Task/Special-characters/Ada/special-characters-1.adb
2026-04-30 12:34:36 -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;