Les cours d'informatique du Type à lunettes

La culture digitale pour les enfants.

View the Project on GitHub sylvain69780/digital-culture

Intro

Avant d’aller plus loin, on va revoir ce qu’on a fait la dernière fois

On va faire un nouveau pavage carré, mais varié

Sebastien Truchet inventeur de ces pavages, est né à Lyon en 1657 ! Il ne pensait pas qu’on allait encore parler de lui 360 ans plus tard. Bravo Sébastien !

A vous de jouer maintenant, je compte sur vous pour que je puisse décorer mon blog de vos meilleures creations.

Les liens utiles

Utiliser la traduction automatique en Francais disponible dans Chrome

En echauffement, commencer par afficher les puissances de 2 : 1,2,4,8,16,32,64 .. 4096 ** Permet de verifier les notions : variables, boucles, ordre d’execution des instructions ** Utiliser des puissances de 2 pour des longeurs est tres utile C’est par exemple un moyen d’eviter d’avoir des pixels bien visibles.

En echauffement, afficher les nombres 0 5 10 15 20 25 30 35 40 avec une boucle FOR. De 3 façons différentes

  • En utilisant une variable de valeur 0 au debut et auquel on ajoute 5 à chaque tour de boucle
  • En utilisant le compteur de boucle et en le multiplicant par 5
  • En utilisant le mot cle STEP de la boucle FOR

Etapes

Utiliser les exemples ci-dessous, mais pas de couper coller

La commande ci-dessous permet de redefinir l’origine 0,0 du repere de l’ecran, ce qui est bien pratique.

VDU 29,640;512;

solution

Tracé dans Desmos

Augmenter les arcs de cercle par pas de 1/8, sachant que nous ne devez pas depasser 11/8 sinon on depasse la diagonale du Carré et le pavage risque de ne plus marcher. On va definir des procedures pour pouvoir mieux organiser notre programme. Une procedure permettra de tracer une coin du pavage Une procedure permettra de tracer un carreau du pavage une procedure de test nous permettra de tester notre affichage. Pour definir une procedure xxx

DEF PROCxxx(A,B)
PRINT A;"coucou";B
ENDPROC

Pour tracer un cercle : centre, point de depart, point d’arrivée.

REM Trace un arc de cercle
MOVE T,T : MOVE 0,T : PLOT &A5,T,0
REM Trace un secteur plein
MOVE T,T : MOVE 0,T : PLOT &B5,T,0

Etape 1

Terminé en couleurs

Terminé noir et blanc Tweetable

Retween de rheolism

Utiliser SNG RND pour avoir un nombre aleatoire à bascule Multiplier par SNG elimine une condition PRINT pour faire avancer la page, l’avantage est qu’on a plus besoine que d’une boucle REPEAT VDU279 probablement pour positioner le cuseur en bas pour le defilement Il a aussi enlevé le T-T * K factorisé en K * T Second retween de rheolism Je pense qu’il fait de la recopie de buffers pour faire defiler

Avec des points

Intermediaire avec flux, non tweetable

Flux seul Tweet

Flux ligne 1 Tweet

Flux secteurs non fini

Flux secteur 3 couleurs non fini