$p1 = $ARGV[0];
$p2 = $ARGV[1];
$l = $ARGV[2];
$N = $p1+$p2;
print "$N $l\n";
while($p1 != 0 || $p2 != 0)
{
#	print $p1."".$p2."--\n";
	$x = int(rand(2));
	if($x == 0)
	{
		if($p1 == 0)
		{
 		   next;
		}
		$p1--;
		
	}
	else 
	{
		if($p2 == 0)
		{ next;}
		$p2--;
	}
	print( ($x+1)." ");
	if($x == 0)
	{
		$x = int(rand($l)+1);
		$y = int(rand($l/2)+1);
		print $x." ".$y."\n";
	}
	else
	{
		do
		{
		$x = int(rand($l));
		$y = int(rand($l));
#		print "$x $y";

			}while($x > $y ||$y-$x<1);
		print $x." ".$y."\n";
	}
}