fork(1) download
copy 
  1. #define x /* ++[>[-]+>>++++++++++[>++++++[>++++++<-]>++<<<<[[-]>+>>>>,----------<<<<<]>[<+>-]>>>>[>+>+<<-]<[>>-<<-]>>>>+<[[-]>-<]>[[-]<<[+]<<<<<<[-]>>[-]+<<>>>>>>>>]>>>>>>>>>>[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<<<<[>>>>+<<<<-]<<<<-]<<<[>>+>+<<<-]>>[<<+>>-]>-[[-]>>>>>>>+++++++++[>>>>>>>>>>>>>>>>>>>>[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<<-]<<<<<<<]<<<-]>>>>>>>>>>>>>>>>>>>>[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<[>>>>>>>>>+<<<<<<<<<-]<++++++++[>>>>>>>>>>[<<<<<<<<+<+>>>>>>>>>-]<<<<<<<<[>>>>>>>>+<<<<<<<<-]+++++++++[<[[<<+>>-]<<->>]<<[>>+<<-]>>>-]<[[-]>>>>>>>>>---------->+<<<<<<<<<<][<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]>[<+>-]><<<<<<<<<<<<<<<<<<<-]>>>>>>>>>>>>+++++++++[<<[[->>>>+<<<<]>>>+<<<]>>>>[-<<<<+>>>>]<<<>>[[->>+<<]<<++++++[<++++++++>-]<.[-]>>>]>>[-<<+>>]<<<<<<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]<[>+<-]>>>>>>>>>>>-] [# Brainf**k
  2. # :-set_prolog_flag(verbose,silent). :-prompt(_, ''). :-use_module(library(readutil)). main:-read_line_to_codes(current_input, C1),read_line_to_codes(current_input, C2),number_codes(X, C1),number_codes(Y, C2),Z is X+Y->writeln(Z);halt. :-main. :- # prolog
  3. 0 and nil and q <<2;
  4. ''' #'
  5. 2
  6. eval 'read a;read b;echo $[a+b];exit;#' if !1; #bash
  7. puts gets.to_i+gets.to_i;  #Ruby
  8. __END__
  9. >;say get()+get();' #Perl 6
  10. #>;print <>+<>,"\n"; __END__ #Perl
  11. #CLIPS   
  12. (defrule readin ?f<-(initial-fact) => (assert (number1 (read)) (number2 (read))))
  13. (defrule writeout ?f<-(number1 ?n)(number2 ?m) => (printout t (+ ?n ?m) crlf) (assert (initial-fact)))   
  14. (reset)   
  15. (run)   
  16. (exit)   
  17.     DO (10) NEXT
  18.     DO :6 <- :7
  19.     DO (10) NEXT
  20.     DO :1 <- :7
  21.     DO :2 <- :6
  22.     DO (1500) NEXT
  23.     DO :6 <- :3
  24.     DO (20) NEXT
  25.     DO .3 <- #10
  26.     DO (8) NEXT
  27.     DO GIVE UP
  28. (10)PLEASE NOTE THAT INPUT INTEGER :7
  29.     DO :7 <- #0
  30.     PLEASE (15) NEXT
  31. (15)DO FORGET #1
  32. (11)PLEASE DO (7) NEXT
  33.     DO .32 <- .1
  34.     DO .2 <- #65488
  35.     DO (1009) NEXT
  36.     DO (12) NEXT
  37.     DO .1 <- .32
  38.     DO .2 <- #48
  39.     DO (1010) NEXT
  40.     PLEASE :1 <- :7
  41.     DO :2 <- #10
  42.     DO (1540) NEXT
  43.     DO :1 <- :3
  44.     DO :2 <- .3
  45.     DO (1500) NEXT
  46.     DO :7 <- :3
  47.     DO (15) NEXT
  48. (13)DO RESUME .4
  49. (12)DO (13) NEXT
  50.     DO RESUME #2
  51. (7) PLEASE NOTE THAT INPUT 1CHAR .1
  52.     DO ,1 <- #1
  53.     DO WRITE IN ,1
  54.     DO .1 <- ,1 SUB #1
  55.     DO .2 <- .97
  56.     DO (1000) NEXT
  57.     DO .97 <- .3~#255
  58.     DO .1 <- .97
  59.     DO RESUME #1
  60. (9) PLEASE NOTE THAT PRINT 1DIG NUM .1
  61.     DO .2 <- #48
  62.     DO (1000) NEXT
  63. (8) PLEASE NOTE THAT OUTPUT 1CHAR .3
  64.     DO .2 <- .3~#1
  65.     DO .1 <- "#0$.3"~"#128$#254"
  66.     DO .4 <- #127
  67.     DO (5) NEXT
  68. (5) PLEASE DO FORGET #1
  69.     DO (1) NEXT
  70.     DO .2 <- ".2$.1"~"#127$#1"
  71.     DO .1 <- "#0$.1"~"#128$#254"
  72.     DO .4 <- "#0$.4"~"#128$#254"
  73.     DO (5) NEXT
  74. (1) DO .5 <- .4~#1
  75.     DO .5 <- ".4$#1"~#3
  76.     DO (2) NEXT
  77.     DO FORGET #1
  78.     DO (4) NEXT
  79. (2) DO (3) NEXT
  80. (3) DO RESUME .5
  81. (4) PLEASE FORGET #1
  82.     DO .98 <- .2
  83.     DO .1 <- .99
  84.     DO .99 <- .98
  85.     PLEASE DO (1010) NEXT
  86.     DO .3 <- .3~#255
  87.     PLEASE DO ,1 <- #1
  88.     PLEASE DO ,1 SUB #1 <- .3
  89.     PLEASE READ OUT ,1
  90.     PLEASE RESUME #1
  91. (20)PLEASE NOTE THAT OUTPUT INT :6
  92.     DO .95 <- #1
  93.     DO .96 <- #0
  94.     DO STASH .95+.96
  95.     PLEASE (21) NEXT
  96. (21)DO FORGET #1
  97.     DO :1 <- :6
  98.     DO :2 <- #10
  99.     PLEASE (1550) NEXT
  100.     DO :5 <- :3
  101.     DO :1 <- :3
  102.     PLEASE (1540) NEXT
  103.     DO :1 <- :6
  104.     DO :2 <- :3
  105.     DO (1510) NEXT
  106.     DO .95 <- #2
  107.     DO .96 <- :3~#255
  108.     DO STASH .95+.96
  109.     DO :6 <- :5
  110.     DO :1 <- :6
  111.     DO :2 <- #65535$#65535
  112.     PLEASE (1509) NEXT
  113.     DO (23) NEXT
  114.     DO (21) NEXT
  115. (23)PLEASE DO (24) NEXT
  116.     DO FORGET #1
  117.     DO (25) NEXT
  118. (24)DO RESUME :4
  119. (25)DO FORGET #1
  120.     PLEASE RETRIEVE .95+.96
  121.     PLEASE (26) NEXT
  122.     DO .1 <- .96
  123.     PLEASE (9) NEXT
  124.     DO (25) NEXT
  125. (26)DO (27) NEXT
  126.     DO RESUME #2
  127. (27)DO RESUME .95
  128.     PLEASE NOTE THAT THIS IS INTERCAL
  129.    */
  130. #if __PIKE__  
  131. int main() {write((int)Stdio.stdin->gets()+(int)Stdio.stdin->gets()+"\n");} //pike
  132. #else   
  133. int main(){int a,b;scanf("%d%d",&a,&b);printf("%d\n",a+b);return 0;} //C
  134. #endif   
  135. //'#]''';print int(raw_input())+int(raw_input());  #Python #Whitespace
  136.  
  137.  
  138.  
  139.  
  140.  
  141.  
  142.  
  143.  
  144.  
  145.  
  146.  
  147.  
  148.  
  149.  
  150.  
Success #stdin #stdout 0.01s 1708KB
comments (?)
stdin
copy 
12345678
4839821
stdout
copy 
17185499
https://ideone.com/JmXx4l
12 language polyglot to add 2 numbers from stdin.
runnable with Bash/Brainf**k/C/CLIPS/INTERCAL/Perl/Perl 6/Python/Ruby/Pike/Prolog (swi)/Whitespace.
language:
Brainf**k (bff 1.0.6)
created:
10 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!