[ create a new paste ] login | about

Link: http://codepad.org/iiwzUsyC    [ raw code | output | fork ]

proch - Perl, pasted on Apr 15:
1
2
3
4
5
6
7
8
9
10
for ($i=0; $i<20; $i++) {

  $c++;
  $x += 4;
  print "$c\t$x\t";
  if ($c == $x) {
    print "OK";
  }
  print "\n";
}


Output:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
1	4	
2	8	
3	12	
4	16	
5	20	
6	24	
7	28	
8	32	
9	36	
10	40	
11	44	
12	48	
13	52	
14	56	
15	60	
16	64	
17	68	
18	72	
19	76	
20	80	


Create a new paste based on this one


Comments: