fork download
copy 
  1. var
  2.   i, j: char;
  3. begin
  4.   for i := 'A' to 'Z' do
  5.   begin
  6.     write('A':(26 - ord(i) + ord('A')));
  7.     for j:= 'B' to i do
  8.       write(j:2);
  9.     writeln;
  10.   end;
  11. end.
Success #stdin #stdout 0.01s 252KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
                         A
                        A B
                       A B C
                      A B C D
                     A B C D E
                    A B C D E F
                   A B C D E F G
                  A B C D E F G H
                 A B C D E F G H I
                A B C D E F G H I J
               A B C D E F G H I J K
              A B C D E F G H I J K L
             A B C D E F G H I J K L M
            A B C D E F G H I J K L M N
           A B C D E F G H I J K L M N O
          A B C D E F G H I J K L M N O P
         A B C D E F G H I J K L M N O P Q
        A B C D E F G H I J K L M N O P Q R
       A B C D E F G H I J K L M N O P Q R S
      A B C D E F G H I J K L M N O P Q R S T
     A B C D E F G H I J K L M N O P Q R S T U
    A B C D E F G H I J K L M N O P Q R S T U V
   A B C D E F G H I J K L M N O P Q R S T U V W
  A B C D E F G H I J K L M N O P Q R S T U V W X
 A B C D E F G H I J K L M N O P Q R S T U V W X Y
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
https://ideone.com/DSVSul
language:
Pascal (fpc 3.0.4)
created:
11 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!