Terminal control/Display an extended character: Difference between revisions
Content added Content deleted
({{header|BASIC}}) |
(Added Ada) |
||
Line 3: | Line 3: | ||
[[Terminal Control::task| ]] |
[[Terminal Control::task| ]] |
||
[[Category:Terminal Control]] |
[[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}}== |
=={{header|BASIC}}== |