program time de futebol;
var
jogador: [1..11]of string[30];
camisa: array[1..11]of integer;
cont: integer;
  begin
   for cont:=1 to 11 do
     begin
        writeln('digite o nome do jogador'cont,':');
        readln(jogador[cont]);
        writeln('digite o numero da camisa:');
        readln(camisa[cont]);
      end;
   for cont:= 1 to 1 do  
           writeln(camisa[cont],'-',jogador[cont]);
end;