fork download
  1. #!/usr/bin/perl6
  2.  
  3. my $n = 25;
  4. my $o = 25;
  5. my $p = ($n + $o);
  6. print("N " ~$n ~ "\n");
  7. print("O " ~$o ~ "\n");
  8. print("P " ~$p ~ "\n");
Success #stdin #stdout 0.24s 81056KB
stdin
1
2
10
42
11
stdout
N 25
O 25
P 50