2 réponses
Algo Cercle
DEBUT
VAR
Pi, perim, aire : Decimal
r : entier
DEBUT
r = 10
Pi = 3,14
perim < ( 2 x Pi x r )
aire < ( 2 x Pi x (r x r))
FIN
DEBUT
VAR
Pi, perim, aire : Decimal
r : entier
DEBUT
r = 10
Pi = 3,14
perim < ( 2 x Pi x r )
aire < ( 2 x Pi x (r x r))
FIN
Darkito
Messages postés
1191
Date d'inscription
Statut
Membre
Dernière intervention
545
ha.. pris de vitesse ;o)
Bonjour,
je me permets de reprendre la syntaxe d'alex
je me permets de reprendre la syntaxe d'alex
Algo cercle
VAR
rayon, perimetre, aire : flottant
DEBUT
Ecrire.Ecran("Veuillez rentrer le rayon du cercle")
rayon < Lire.Saisie()
perimetre = 3.14 * 2 * rayon
aire = 3.14 * rayon * rayon
Ecrire.Ecran("L'aire du cercle est : " & aire)
Ecrire.Ecran("Le périmètre du cercle est : " & perimetre)
FIN