КИТА unofficial

package test;

public class test1App {
    
    private static final int M = 3;
    private static final int N = 4;
    private enum Direction{left, right, top, bottom}

    private int rows;
    private int cols;
    private Integer[][] matrix;

    public test1App() {
        this(M,N);
    }

    public test1App(int rows, int cols) {
        if((rows <2) || (cols <2)){
            throw new RuntimeException("Failed to create required matrix!");
        }
        this.rows = rows;
        this.cols = cols;
        this.matrix = fillMatrix();
    }

    private Integer[][] initMatrix(){
        Integer matrix[][] = new Integer[this.rows][this.cols];
        for(int i1=0; i1<this.rows; i1++){
            for(int i2=0; i2<this.cols; i2++){
                matrix[i1][i2] = 0;
            }
        }
        return matrix;
    }

    private void printMatrix(){
        for(int i1=0; i1< this.rows; i1++){
            for(int i2=0; i2<this.cols; i2++){
                System.out.print(Integer.toString(matrix[i1][i2])+" ");
            }
            System.out.println();
        }
    }

    private Integer[][] fillMatrix(){
        Integer[][] matrix = initMatrix();
        int x = 0, y = 0;
        Direction direction = Direction.right;
        int xlowlim = 0, xhighlim = cols-1;
        int ylowlim = 1, yhighlim = rows-1;
        for(int value = 1; value <= cols*rows; value++){
            matrix[y][x] = value;

            switch(direction){
                case right:{
                    x++;
                    if(x == xhighlim){
                        xhighlim--;
                        direction = Direction.bottom;
                    }
                    break;}
                case bottom: {
                    y++;
                    if(y == yhighlim){
                        yhighlim--;
                        direction = Direction.left;
                    }
                    break;}
                case left:{
                    x--;
                    if(x == xlowlim){
                        xlowlim++;
                        direction = Direction.top;
                    }
                    break;}
                case top:{
                    y--;
                    if(y == ylowlim){
                        ylowlim++;
                        direction = Direction.right;
                    }
                    break;}

            }
            
        }
        return matrix;
    }

    public void run(){
        printMatrix();
    }

    public static void main(String[] args){
        try{
            test1App test1 = new test1App(6,2);
            test1.run();
        }catch(Throwable ex){
            ex.printStackTrace();
        }
    }
}

$ ./iskus_prog8.pl
0 0 0
0 0 0
0 0 0
0 0 0
1 10 9
2 11 8
3 12 7
4 5 6

#!/usr/bin/perl -w

use strict;

use constant N => 4;
use constant M => 3;

sub printmat;

my @a;
my ($i,$j);

for($i=0;$i<N;$i++)
{
  for($j=0;$j<M;$j++)
    {
	  $a[$i][$j]=0;
	}

}

printmat;

my $cnt=1;
my $flag=0;
$i=0;
$j=0;
my $dirx=1;
my $diry=0;


while($cnt<=N*M){

  if(($i<N)&&($j<M)&&($a[$i][$j]==0)){
    $a[$i][$j]=$cnt;
    $cnt++;
	$i+=$dirx;
	$j+=$diry;
  }else{
	$i-=$dirx;
	$j-=$diry;
   if($dirx==1 && $diry==0)
   { 
     $dirx=0;
	 $diry=1;   
   
   }elsif($dirx==0 && $diry==1)
     {
	   $dirx=-1;
	   $diry=0;   
	 }elsif($dirx==-1 && $diry==0)
     {
	   $dirx=0;
	   $diry=-1;   
	 }elsif($dirx==0 && $diry==-1)
     {
	   $dirx=1;
	   $diry=0;   
	 }
	$i+=$dirx;
	$j+=$diry;
  }
  
  
} 

printmat;

sub printmat
{
  my $i;
  my $j;
  
  for($i=0;$i<N;$i++)
  {
  for($j=0;$j<M;$j++)
    {
	  print $a[$i][$j]," ";
	}
	print "\n";
  }
}