Idiomatically determine all the characters that can be used for symbols: Difference between revisions
Idiomatically determine all the characters that can be used for symbols (view source)
Revision as of 18:01, 26 May 2024
, 1 month ago→{{header|Wren}}: Iteration variable should be lower case,
m (→{{header|Wren}}: Changed to Wren S/H) |
m (→{{header|Wren}}: Iteration variable should be lower case,) |
||
(3 intermediate revisions by 2 users not shown) | |||
Line 17:
* [[Idiomatically_determine_all_the_lowercase_and_uppercase_letters|Idiomatically determine all the lowercase and uppercase letters]].
<br><br>
=={{header|Ada}}==
{{works with|Ada|95 or greater}}
<syntaxhighlight lang="ada">
with Ada.Strings.Maps; use Ada.Strings.Maps;
with Ada.Text_IO;
procedure Show_Valid_Identifiers is
Valid_First_Character : constant Character_Set := To_Set (Ranges => (1 => ('a', 'z'), 2 => ('A', 'Z')));
Valid_Last_Character : constant Character_Set := Valid_First_Character or To_Set (Ranges => (1 => ('0', '9')));
Valid_Middle_Character : constant Character_Set := Valid_Last_Character or To_Set ('_');
begin
Ada.Text_IO.Put_Line ("Valid for the first character: " & String (To_Sequence (Valid_First_Character)));
Ada.Text_IO.Put_Line ("Valid for any middle character: " & String (To_Sequence (Valid_Middle_Character)));
Ada.Text_IO.Put_Line ("Valid for the last character: " & String (To_Sequence (Valid_Last_Character)));
end Show_Valid_Identifiers;
</syntaxhighlight>
{{out}}
<pre>
Valid for the first character: ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
Valid for any middle character: 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ_abcdefghijklmnopqrstuvwxyz
Valid for the last character: 0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz
</pre>
=={{header|ALGOL 68}}==
Line 1,069 ⟶ 1,093:
<syntaxhighlight lang="wren">for (i in 97..122) System.write(String.fromByte(i))
for (i in 65..90) System.write(String.fromByte(i))
for (i in 48..57) System.write(String.fromByte(i))
System.print("_")</syntaxhighlight>
{{out}}
<pre>
abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_
</pre>
|