rech génie pour calcul de superficie

Discutez de vos problèmes de programmation.

rech génie pour calcul de superficie

Messagepar MatosBKO » 21 Juillet 2008 19:54

Salut
Il me faudrait un programmeur un un matheux,qui parle le language sharp ? pour traduire ça vers un language CASIO graph 30, c pour calculer la surperficie de polygone complexe. Bon c clair c pas à la porté de tout le monde :D , moi je comprend rien y a des variable qui viennent se greffer sans avoir etait défini avant ???!!!! EN clair il faut un boss de la prog

voilà le prog sur sharp
10 : "A" : PAUSE "CALCUL DE SUPERFICIE"
20 : CLEAR : INPUT "NOMBRE DE COTE =" ; N
30 : FOR I = 1TO N : PAUSE "........." . I
40 : INPUT " ANGLE= " ; A , "COTE=" ; B
50 : P=P+B : X= X+B* SIN A : Y = Y+B*COS A
60 : W = W+X : Z=Z+Y
70 : S = S+B*SIN A * Y - B*COS A * X
80 : NEXT I
90 : C = (racine carré) ( X*X + Y*Y)/P*100 : IF C >5 GOTO 130
100 : S = ABS( S/2+Y*W/N-X*Z/N)/100+5
110 : PRINT USING "####" ; "S =" ; S; "ARES"
120 : GOTO 20
130 : PRINT " MESURE A REPRENDRE"
140 : GOTO 20
150 : END

Voilà j'espère que j'ai pas taper tout ça pour rien :D
a+
MatosBKO
 
Messages: 5
Inscription: 20 Juillet 2008 0:26

Re: rech génie pour calcul de superficie

Messagepar Laurae » 22 Juillet 2008 9:32

Prog "Superfic" (the title of the prog..)

ClrText
Lbl 0
0->A~Z
"NOMBRE DE COTE"?->N
For 1->I To N
"ANGLE"?->A
"COTE"?->B
P+B->P
X+B*sinA->X
Y+B*cosA->Y
S+B*sinA*Y-B*cosA*X->S
Next
(racine carre)(X^2+Y^2)/P*100->C
C>5->(the conditional one) Goto 1
Abs(S/2+Y*W/N-X*Z/N)/100+5->S
"S=(en ARES)"
S(and the sign that look like a triangle to make the -- Disp -- thing)
Goto 0
Lbl 1
"MESURE A REPRENDRE"
Goto 0

not sure if it works through, there may be things that are different when calculating..)
Fichiers joints
SUPERFIC.rar
(468 Octets) Téléchargé 75 fois
Mod CasioExpert.com
Co-administrateur TI-Planet (avec une partie Casio)
Laurae
 
Messages: 141
Inscription: 25 Novembre 2007 19:23
Localisation: Ozoir-la-Ferrière

Re: rech génie pour calcul de superficie

Messagepar MatosBKO » 22 Juillet 2008 10:03

hi laurae

Thanks for your help, i'm going to edit this prog, if you want to test it, you can try this
ANGLES Cotés
263 42
2 90
67 27
173 96

sUPERFICIE = 32 ares

With the sharp programme it's OK, il will test your prog, but you can try it until i get it

bye
MatosBKO
 
Messages: 5
Inscription: 20 Juillet 2008 0:26

Re: rech génie pour calcul de superficie

Messagepar MatosBKO » 22 Juillet 2008 11:06

doesn't work "syntaxe error" :(
MatosBKO
 
Messages: 5
Inscription: 20 Juillet 2008 0:26

Re: rech génie pour calcul de superficie

Messagepar Laurae » 13 Août 2008 13:20

I've tried with what you wrote and I got 16.4305868194614.
Mod CasioExpert.com
Co-administrateur TI-Planet (avec une partie Casio)
Laurae
 
Messages: 141
Inscription: 25 Novembre 2007 19:23
Localisation: Ozoir-la-Ferrière

Re: rech génie pour calcul de superficie

Messagepar MatosBKO » 13 Août 2008 13:54

the exemple i wrote is an test, which is verified
you certenly did a mistake, but you surely will find it, when you have it can you give me all the program in detail ? for a casio graph 30
thank you
MatosBKO
 
Messages: 5
Inscription: 20 Juillet 2008 0:26

Re: rech génie pour calcul de superficie

Messagepar Laurae » 15 Août 2008 11:44

If you can use the signs "(" and ")" to separate all the calculation priorities I would be able to see where is the problem (in the sharp program).
Mod CasioExpert.com
Co-administrateur TI-Planet (avec une partie Casio)
Laurae
 
Messages: 141
Inscription: 25 Novembre 2007 19:23
Localisation: Ozoir-la-Ferrière


Retourner vers Problèmes

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 0 invités


xhtml css      © 2001-2014 CasioExpert.com      CasioExpert.com v6      conception & réalisation Mickaël Morier