var
a:array[1..10] of real;
i,min,max:integer;
begin
min:=2;
max:=2;
for i:=1 to 10 do begin
read(a[i]);
if i mod 2 = 0 then begin
    if a[i]>a[max] then max:=i;
    if a[i]<a[min] then min:=i;
end;
end;
write('Ëó÷øèé ',a[min]:2:1,', èãðîê ¹',a[min-1],'; Õóäøèé ',a[max]:2:1,' èãðîê ¹',a[max-1]);
end.