//C++
#include <iostream>
using namespace std;

int main()
{
	int arr[10];
	for (int i=1; i<=10; i++)
	{
		if (i&1)
		{
		 	arr[i]=i;
	    }
		else
			{
				arr[i]=3*i;
		    }
		cout << "a["<<i<<"] = "<<arr[i]<<endl;
	}
	return 0;
}


//Pascal
const
  size = 10;

var
  arr: array [1..10] of integer;
  i: integer;

begin
  for i := 1 to size do 
  begin
    if (i mod 2 = 0) then 
      arr[i] := 3 * i else arr[i] := i;
    writeln('a[', i, ']= ', arr[i]);
  end;
end.