ºÝºÝߣ

ºÝºÝߣShare a Scribd company logo

Ppt Prog Fox

?Download as PPT, PDF?
?
M
marcela veronica

The document discusses FoxPro code examples for programs that check if a number is even or odd. The first example checks if a single input number is even or odd. The second example enhances this by adding a loop to check 100 randomly input numbers and report which are even or odd. Diagrams are included to illustrate the program flow.

1 of 5
Download to read offline
MI PRIMER PROGRAMA EN FOX
CLEAR INPUT ¡°INGRESE EL NUMERO: ¡± TO N R = INT (N/2)*2 IF R =N THEN ¡°EL NUMERO ES PAR¡± ELSE ¡°EL NUMERO NO ES PAR¡± ENDIF END PROGRAMA EN FOX, SU C?DIGO SER?A¡­ DIAGRAMA ¡° SABER SI UN NRO INGRESADO ES PAR¡± N R = N R = INT(N/2)*2 INICIO ¡° El numero es par¡± FIN ¡° El numero no es par¡±
Y SI AGREGAMOS UN CICLO??? POR EJEMPLO QUEREMOS INGRESAR 100 NUMEROS AL AZAR E INFORMAR CUAL ES PAR Y CUAL NO¡­ SOS
CLEAR C = 1 DO WHILE C ¡Ü 100 INPUT ¡°INGRESE EL NUMERO: ¡± TO N R = INT (N/2)*2 IF R =N THEN WAIT ¡°EL NUMERO ES PAR¡± ELSE WAIT ¡®EL NUMERO NO ES PAR¡± ENDIF C = C +1 ENDDO WAIT ¡®POR FIN TERMINE¡­ ? ¡¯ END PROGRAMA EN FOX, SU C?DIGO SER?A¡­ DIAGRAMA ¡° DE 100 NROS SABER CUAL ES PAR Y CUAL NO¡± INICIO FIN N R = N R = INT(N/2)*2 ¡° N NO ES PAR¡± ¡° N ES PAR¡± C= 1 C ¡Ü 100 C = C + 1
A SEGUIR PROBANDO... Moodler: Ing. Marcela Ver¨®nica Cella Curso moodle: telecom ¨C frtn 15-05-2009 Colegio Independencia - Sgo. Del Estero

More Related Content

Ppt Prog Fox

  • 2. CLEAR INPUT ¡°INGRESE EL NUMERO: ¡± TO N R = INT (N/2)*2 IF R =N THEN ¡°EL NUMERO ES PAR¡± ELSE ¡°EL NUMERO NO ES PAR¡± ENDIF END PROGRAMA EN FOX, SU C?DIGO SER?A¡­ DIAGRAMA ¡° SABER SI UN NRO INGRESADO ES PAR¡± N R = N R = INT(N/2)*2 INICIO ¡° El numero es par¡± FIN ¡° El numero no es par¡±
  • 3. Y SI AGREGAMOS UN CICLO??? POR EJEMPLO QUEREMOS INGRESAR 100 NUMEROS AL AZAR E INFORMAR CUAL ES PAR Y CUAL NO¡­ SOS
  • 4. CLEAR C = 1 DO WHILE C ¡Ü 100 INPUT ¡°INGRESE EL NUMERO: ¡± TO N R = INT (N/2)*2 IF R =N THEN WAIT ¡°EL NUMERO ES PAR¡± ELSE WAIT ¡®EL NUMERO NO ES PAR¡± ENDIF C = C +1 ENDDO WAIT ¡®POR FIN TERMINE¡­ ? ¡¯ END PROGRAMA EN FOX, SU C?DIGO SER?A¡­ DIAGRAMA ¡° DE 100 NROS SABER CUAL ES PAR Y CUAL NO¡± INICIO FIN N R = N R = INT(N/2)*2 ¡° N NO ES PAR¡± ¡° N ES PAR¡± C= 1 C ¡Ü 100 C = C + 1
  • 5. A SEGUIR PROBANDO... Moodler: Ing. Marcela Ver¨®nica Cella Curso moodle: telecom ¨C frtn 15-05-2009 Colegio Independencia - Sgo. Del Estero