1. PHP / Говнокод #25126

    −4

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    начало пхп прог уннамед

подключить "пхп модуль 1.0"

доллар целое а = 4
доллар целое б = 2

печать сум доллар а + доллар б 2

помолиться perl

конец пхп прог уннамед

    Запостил: Ksyrx, 28 Ноября 2018

    Комментарии (4) RSS

    • ava guest8 29.11.2018 02:12 # −999

      показать все, что скрытоvanished
      Ответить

    • ava bormand 29.11.2018 07:26 # 0

      Что за язык?
      Ответить

      • ava another_fake 29.11.2018 08:08 # 0

        Великий и могучий
        WORDLIST CONSTANT пхп

: начало  GET-ORDER ' EXECUTE SWAP 1+ SET-ORDER ;

пхп SET-CURRENT

: прог  BL WORD DROP ;
: подключить  [CHAR] " WORD COUNT INCLUDED ;
: доллар  ' EXECUTE ;
: =  INTERPRET DEPTH 2 ?DO DROP LOOP SWAP ! ;
: целое
   CREATE HERE 1 CELLS ALLOT
   BL WORD FIND IF
      [ начало пхп ] ['] = DUP [ PREVIOUS ] = IF EXECUTE ELSE DROP THEN
   ELSE 2DROP THEN
;
: сум  INTERPRET DEPTH 1 ?DO + LOOP ;
: печать   INTERPRET . ;
: +  @ ' EXECUTE @ + ;
: помолиться ' EXECUTE TYPE ;
: perl  S" <здесь молитва perl>" ;
: конец  BYE ;
        Ответить

      • ava Ksyrx 03.12.2018 15:14 # 0

        пхп не видно б**** что ли
        Ответить

    Добавить комментарий