print(%io(2),"Si premier enfant fille, les couples ont un deuxieme enfant")
filles=0;
garcons=0;
for i=1:100000 do
    if (rand()<0.5) then
       garcons=garcons+1;
    else
	   filles=filles+1;
      	if (rand()<0.5) then
      	   garcons=garcons+1;
      	else
      	   filles=filles+1;
      	end,
    end,
end,
print(%io(2),(garcons*100/(garcons+filles)));
print(%io(2),(filles*100/(garcons+filles)));

print(%io(2),"Si premier enfant fille, 79% des couples ont un deuxieme enfant")
filles=0;
garcons=0;
for i=1:100000 do
    if (rand()<0.5) then
       garcons=garcons+1;
    else
	   filles=filles+1;
	   if (rand()<0.79) then
         	if (rand()<0.5) then
         	    garcons=garcons+1;
          	else
      	       filles=filles+1;
      	   end,
       end,
    end,
end,
print(%io(2),(garcons*100/(garcons+filles)));
print(%io(2),(filles*100/(garcons+filles)));
