program z1623;
uses crt;
var x,y,k: byte;
BEGIN
k:=0;
for y:=0 to 16 do
begin
x:=(64-4*y)div 2;
writeln(x,'gus i',y,'krol');
k:=k+1;
end;
writeln(k);
END.