Anonymous user
Terminal control/Display an extended character: Difference between revisions
Terminal control/Display an extended character (view source)
Revision as of 20:28, 26 December 2010
, 13 years agoAdded Ada unicode example.
(Added Ada) |
m (Added Ada unicode example.) |
||
Line 13:
Put(Ada.Characters.Latin_1.Pound_Sign);
end Pound;</lang>
Ada allows Unicode characters in the source, and provides output functions on "wide characters".
<lang ada>with Ada.Wide_Text_IO; use Ada.Wide_Text_IO;
procedure Unicode is
begin
Put("札幌");
end Unicode;</ada>
=={{header|BASIC}}==
| |||