Pour préciser ce que j'ai déjà fait, au début j'ai modélisé le pendule avec ça:

> restart;
>
> with(plottools); with(plots); c := sphere([0, 0, 0], .5); display(c, scaling = constrained, style = patch, axes = boxed); with(plottools); with(plots); d := cylinder([0, 0, .5], 0.5e-1, 9); display(d, orientation = [0, 0], scaling = constrained); plots[display]({c, d}, orientation = [15, 55]);

Ce qui fonctionne très bien. Mais je ne sais pas comment l'animer après ce codage. Alors j'ai essayé autre chose mais qui ne marche pas (sans doute parce que je manie très mal cette fonctionalité):

> F:= proc(t) plots[display] (plottools[sphere]([0,cos(t),0],0.5, scaling=constrained,style=patc h,axes=boxed): plottools[cylinder]([0,cos(t),0.5], 0.05, 9, orientation=[0, 0], scaling=constrained); end proc: animate(F,[t], t=0..Pi); ;

Et on me met:
"Error, unable to match delimiters" (je sais le codage est sûrement très maladroit)

Quelqu'un pourrait-il m'aider pour continuer le premier codage ou corriger le second ? ce serait très sympa