Terminal control/Display an extended character: Difference between revisions

Added Ada
({{header|BASIC}})
(Added Ada)
Line 3:
[[Terminal Control::task| ]]
[[Category:Terminal Control]]
 
=={{header|Ada}}==
 
<lang ada>with Ada.Text_IO; use Ada.Text_IO;
with Ada.Characters.Latin_1;
 
procedure Pound is
begin
Put(Ada.Characters.Latin_1.Pound_Sign);
end Pound;</lang>
 
=={{header|BASIC}}==
Anonymous user