const 
  currentVase: array[0..5] of integer = (1, 2, 3, 2, 3, 2);

var
  s: integer;
  candies: array[1..3] of integer;
  
begin
  write('Ââåäèòå ÷èñëà a, b, c: ');
  read(candies[1], candies[2], candies[3]);
  while candies[currentVase[s mod 6]] > 0 do
  begin
    dec(candies[currentVase[s mod 6]]);
    inc(s);
  end;
  writeln(s);
end.