Variante de [url=https://www.geogebra.org/m/r3kyd6jh]https://www.geogebra.org/m/r3kyd6jh[/url]

[url=https://geogebra.org/python/index.html?name=Blanc+et+noir.&code=eJx9k82OmzAQx%2B88hbU5lGwcAtHmEonDZne7UhWU3KOoYsHJOoBNjYnwuS%2FTvkb7Yp0xZPO5tWRs%2F2ewfzMeb5QsiIpFCgMvSqn0vdOORPOCOb1vM%2FKiOROCkXFAdrHYc6bI2B9PHMdJ2YYkTGjFtirec83cRzqjT%2FS5P3UINMV0rQRZSi606z56zWAG%2FQn6s9f0Rw8UNAOaAc2AZlDj1fc9r%2FhbzsKvcV6xvuP0gC3eMpLWpMS9SETKWJH8y7sspH7%2F%2B%2FPPb2AkKetoyIIwjUsVlzaWbGpZ7S5uRBc0u0WY3buR1wwXwDaAD7VrA2uDa3ObbCHIFgEEfH7B0TVkaqt4nlsei1uRHzUDWilIpWWSgSUWlfXMeaWto51UJLKcKasqLtyUFzRpaGI62Chcre1kIxUxhAu8OQjIp%2BgZdF7Y5gfPg3fzP29sy7DNQTOoBYc%2FCneIRzd9ak4UgzA38nC609yDpDORusujHh20eash0u6IBEDDUyA088%2FN2F7D88KLVrv1iq9pOw4CO4PhfL4%2BR8VzsuM5AZ1cnIItkXAjIQmG2WhyZSwhbbnZSuGuuuLqOF4p%2Fge5OlGRpNOvNjo6fkBfbdGGcNDXVJZxwrUJAxByqcKVmw2C%2FmhCL8aLqLHh4%2FaqnLHS9T3fn7Qeve45RPC2sbZfGqzspNYcSnfqOBsp0o%2BA23oZBj7FflUTtLV%2FZnboQ0d995bHSXZ3jAaeVfcAJtT3AuwgOf8AwNddhA%3D%3D]LIEN / LINK[/url]

[code][/code]from random import*[br]import time[br]#JB Etienne 21 janvier 2025[br][br][br]def centregravite(A,B,C,D):[br] return Point((A.x+B.x+C.x+D.x)/4,(A.y+B.y+C.y+D.y)/4,is_visible=False)[br][br]# image du point M par l'homothétie de centre O et de rapport k:[br]def image(M,O,k):[br] return Point(k*(M.x-O.x)+O.x,k*(M.y-O.y)+O.y,is_visible=False)[br][br]# On génère une grille de points que l'on stocke dans une liste de listes M[br]def dessin(dim,cx,cy):[br] M=[][br] for y in range(0,dim,1):[br] L=[][br] for x in range(0,dim,1):[br] P=Point(x+uniform(-cx,cx),y+uniform(-cy,cy),is_visible=False)[br] L.append(P)[br] M.append(L)[br] for j in range(dim-1):[br] for i in range(dim-1):[br] G=centregravite(M[j][i],M[j][i+1],M[j+1][i+1],M[j+1][i])[br] for k in range(1,5):[br] coef = 1-k/5[br] p=Polygon([image(M[j][i],G,coef),image(M[j][i+1],G,coef)[br] ,image(M[j+1][i+1],G,coef),image(M[j+1][i],G,coef)],opacity=1,color=[(k+1)/5,(k+1)/5,(k+1)/5])[br] time.sleep(0.005)[br] #return M[br][br][br][br][br]# Exécution :[br][br]fond=Polygon(Point(-10,-10,is_visible=False),Point(10,-10,is_visible=False)[br],4,color="black",opacity=1)[br][br]dessin(5,0.1,0.1)