We use cookies to ensure you have the best browsing experience on our website. Please read our cookie policy for more information about how we use cookies.
  1. Prepare
  2. Algorithms
  3. Implementation
  4. Circular Array Rotation
  5. Discussions

Circular Array Rotation

  • D4RIO
     + 1 comment

    What a powerful and flexible language Perl

    chomp(($n, $k, $q)=split(/ /,<>));
chomp(my @A=split(/ /,<>));
while(<>){ print $A[($_-$k)%$n],"\n"; }