Generate lower case ASCII alphabet: Difference between revisions

From Rosetta Code
Content deleted Content added
+ Ada and D entries
Grondilu (talk | contribs)
Perl 6
Line 40: Line 40:
.array;
.array;
}</lang>
}</lang>

{{head|Perl 6}}
<lang Perl 6> say 'a'..'z'</lang>

Revision as of 16:26, 2 August 2013

Generate lower case ASCII alphabet is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.

Generate an array, list, lazy sequence, or even an indexable string of all the lower case ASCII characters, from 'a' to 'z'.

If the standard library contains such sequence, show how to access it, but don't fail to show how to generate a similar sequence. For this basic task use a reliable style of coding, a style fit for a large program, and use strong typing if available.

Ada

<lang ada>procedure Alphabet is

 type Arr_Type is array (Integer range <>) of Character;
 Arr : Arr_Type (1 .. 26);
 C : Character := 'a';

begin

 for I in Arr'Range loop
   Arr (I) := C;
   C := Character'Succ (C);
 end loop;

end;</lang>

D

The lower case ASCII letters of the Phobos standard library: <lang d>import std.ascii: lowercase;

void main() {}</lang>

The generation of the ASCII alphabet array: <lang d>void main() {

   char[26] arr;
   foreach (immutable i, ref c; arr)
       // c = 'a' + i;
       c = cast(char)('a' + i);

}</lang>

An alternative version: <lang d>import std.range, std.algorithm, std.array;

void main() {

   char[26] arr = 26
                  .iota
                  .map!(i => cast(char)('a' + i))
                  .array;

}</lang>

Template:Head <lang Perl 6> say 'a'..'z'</lang>