Program TuKpa6;
const n=5;
const m=5;
var
A:array[1..n,1..m] of integer;
i,j:integer;
BEGIN
for i:=1 to n do
  begin
    for j:=1 to m do
      begin
        a[i,j]:=10*i+j;
      end;
  end;
writeln('HaIIgeHo:');
for i:=1 to n do
  begin
    for j:=1 to m do
      begin
        if (odd(a[i,j])) and (a[i,j]<40) and (a[i,j] mod 5 = 2) then
          begin
            writeln('a[',i,j,']=',a[i,j]);
          end;
      end;
  end;
writeln('koHeII,');
END.