Validar RUT!
INTERCAL

Enviado por Aldrin Martoq


DON'T BE FOOLED: THIS PROGRAM REALLY WORKS!!
It was written by Aldrin Martoq timed on 1046931060
This program is in the public domain
PLEASE DO ,1 <- #12
DO ,1 SUB #2 <- #28
DO ,1 SUB #1 <- #110
DO ,1 SUB #11 <- #128
DO ,1 SUB #3 <- #144
DO ,1 SUB #10 <- #160 (96)
PLEASE DO ,1 SUB #12 <- #206 (69)
DO (1550) NEXT
PLEASE STASH :1
PLEASE STASH :3
DO :1 <- :3
DO (1549) NEXT
PLEASE RETRIEVE :1
DO :2 <- :3
DO (1510) NEXT
DO :2 <- :3
PLEASE RETRIEVE :3
DO RESUME #1 (10)
PLEASE DO :2 <- #10
DO .1 <- .4
DO .2 <- #1
DO (1010) NEXT
DO .4 <- .3
DO (69) NEXT
DO :6 <- :3
DO :1 <- .4
DO (1549) NEXT
DO :1 <- :5
DO :2 <- :3
PLEASE DO (1509) NEXT
DO :5 <- :3
DO :1 <- :6
DO RESUME #1
PLEASE DO COME FROM (96)
DO ,1 SUB #9 <- #186
DO ,1 SUB #8 <- #162
DO ,1 SUB #7 <- #40
DO ,1 SUB #6 <- #216
DO ,1 SUB #5 <- #168
DO ,1 SUB #4 <- #152
DO READ OUT ,1
DO WRITE IN :1
PLEASE STASH :1
DO (18) NEXT
PLEASE DO RETRIEVE :1 (81)
DO READ OUT :1 + :3 (18)
PLEASE DO .4 <- #10
DO :5 <- #0
DO (10) NEXT
DO (10) NEXT
DO (10) NEXT
DO (10) NEXT
DO (10) NEXT
DO (10) NEXT
PLEASE DO .4 <- #10
DO (10) NEXT
DO (10) NEXT
DO :2 <- #11
DO :1 <- :5
DO (69) NEXT
DO :3 <- :2
DO RESUME #1
DO COME FROM (81)
DON'T UNDERSTAND THIS? Abandon all hope and just PLEASE GIVE UP