Немного нумерологии

[spamsink]

Целая нумерология:

                PROGRAM MAIN
                I=641125060200
                PRINT 10,I,I
             10 FORMAT(1XI12/1XO16)
                END
      *EXECUTE
 641125060200
 6411250602007150

Плавающая нумерология:

                PROGRAM MAIN
                A=.375400644066
       2        PRINT 10,A,A
             10 FORMAT(1XF14.12/3XO16)
                END
           *EXECUTE
 0.375400644066
   3754006440661122

Comments

[spamsink]

А также

  4.150231654516
   4150231654516537

  43.1262011656
   4312620116560334

  445.573112674
   4455731126740617

  4651.05303311
   4651053033116240

  50141.7355704
   5014173557047130

  515757.255202
   5157572552025236

   5352152.55421
   5352152554215702

   55151142.4231
   5515114242315424

   571040454.261
   5710404542614413

   6053214627.15
   6053214627150623

   62163623663.6
   6216362366367372

   6553727504632
   6553727504631037

   67172136732608
   6717213673262437

   711206655320064
   7112066553201530

   7254706073613372
   7254706073611675

[vak]

Ничего себе.
Красиво!

[spamsink]

Их довольно много. Думаю, что за все годы жизни БЭСМ-6 искать такие паттерны никто не пытался. Интересно, прав ли я.