C :

#include<stdio.h>
void f(int a[3][3])
{
	int i,j;
	int temp;
	for(i=0;i<3;i++)
	{
		for(j=0;j<3;j++)
		{
			if(j<=i)
			{
				temp=a[i][j];
				a[i][j]=a[j][i];
				a[j][i]=temp;
			}
		}
	}
}
int main(void)
{
	int a[3][3];
	int i,j;
	int x;
	for(i=0;i<3;i++)
	    for(j=0;j<3;j++)
	    {
		    scanf("%d",&x);
		    a[i][j]=x;
		 }
   f(a);
  	for(i=0;i<3;i++)
   {
	   for(j=0;j<3;j++)
	   {
		    printf("%d ",a[i][j]);
		}
		printf("\n");
	}
	return 0;
}

C++ :

#include <stdio.h>
#include <math.h>
int main() {
	void T(int array[][3]);
	int i, j;
	int dat[3][3];
	for (i = 0;i < 3;i++)
		for (j = 0;j < 3;j++)
			scanf("%d", &dat[i][j]);
	T(dat);
	for (i = 0;i < 3;i++) {
		for (j = 0;j < 3;j++)
			printf("%d ", dat[i][j]);
		puts("");
	}
	return 0;
}
void T(int array[][3]) {
	int i, j, temp;
	for (i = 0;i < 3;i++) {
		for (j = 0;j < i;j++) {
			temp = array[i][j];
			array[i][j] = array[j][i];
			array[j][i] = temp;
		}
	}
}

Pascal :

var
  a:array[1..3,1..3] of longint;
  i,j:longint;
begin
  for i:=1 to 3 do
    for j:=1 to 3 do
    read(a[i,j]);
  readln;
  for i:=1 to 3 do
  begin
    for j:=1 to 3 do
    write(a[j,i],' ');
    writeln;
  end;
end.

Java :

import java.util.*;

public class Main {
	public static void main(String[] args) {
		Scanner in=new Scanner(System.in);
		int [][]a=new int[3][3];
		int c=0;
		for(int i=0;i<3;i++)
			for(int j=0;j<3;j++)
				a[i][j]=in.nextInt();
		for(int j=0;j<3;j++)
			System.out.print (a[j][0]+" ");
		System.out.println ();
		for(int j=0;j<3;j++)
			System.out.print (a[j][1]+" ");
		System.out.println ();
		for(int j=0;j<3;j++)
			System.out.print (a[j][2]+" ");
		System.out.println ();
	}	
}