program varliu_koncertas;
  const MAX = 10; { maksimalus varli— skai‡ius }
  type periodai = array [1..MAX] of integer;

  function dbd (x, y: longint): longint;
  { randa skai‡i— x ir y bendr…j did‘iausi… dalikl }
  begin
    if x = 0
       then dbd := y
       else dbd := dbd (y mod x, x);
  end;

  function mbk (x, y: longint): longint;
  { randa skai‡i— x ir y bendr…j ma‘iausi… kartotin }
  begin
    mbk := x div dbd (x, y) * y
  end;

  var val, min, i, kart, varles: longint;
      p: periodai;
begin
  readln (varles);
  for i := 1 to  varles do
    read (p[i]);
  kart := p[1];
  for i := 2 to varles do
    kart := mbk (kart, p[i]);
  val := kart div 60;
  min := kart mod 60;
  writeln ('Koncertas vyks po ', val, ' val. ir ', min, ' min.');
end.