var
a=array[1..6,1..6] of integer;
mass=array[1..36] of integer;
b,c,d,i,j:integer;
BEGIN
	b=0;
	c=1;
	randomize;
	for i:=1 to 6 do
		for j:=1 to 6 do
		a[i,j]:=random(10+20)-20;
for i:=1 to 6 do
	for j:=1 to 6 do
	begin
		if a[i,j]<0 then
		mass[c]:=a[i,j]
		c=c+1;
	end;
for i:=1 to 36 do
	begin
	if mass[i]>b then
	b=mass[i];
	end;
for i:=1 to 6 do
	for j:=1 to 6 do
	begin
	if b=a[i,j] then
	writeln('#iskomogo=',i,j)
	writeln('iskomiy',b)
	end;
end.