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