EJERCICIOS DE TALLER PARA LA CLASE
+10
Vania_Argueta4
nery_figueroa_18
Alejandro_Hurtado29
caroline_gomez19
Annaly_Castañeda9
María_González20
isaac_abadillo1
Bryan_Andrino3
alexander_cos14
omar_barrientos_6
14 participantes
Página 1 de 1.
EJERCICIOS DE TALLER PARA LA CLASE
DONDE PODER SUBIR EJERCICIOS DE TALLER PARA LA CLASE
omar_barrientos_6- Admin
- Mensajes : 17
Fecha de inscripción : 22/01/2009
Edad : 31
Re: EJERCICIOS DE TALLER PARA LA CLASE
http://rapidshare.com/files/212794455/MINUTOS_PARA_EL_MEDIODIA.rar.html
alexander_cos14- Mensajes : 11
Fecha de inscripción : 28/01/2009
Edad : 31
Localización : GUATEMALA
Re: EJERCICIOS DE TALLER PARA LA CLASE
Aqui les dejo el ejemplo de como hacer el totito en la form
Totito de form
Totito de form
Bryan_Andrino3- Mensajes : 7
Fecha de inscripción : 24/01/2009
Edad : 31
Localización : Guatemala
profe no pude enbiarlo mejor le mando el pseudocodigo
CLEAR
opcion=" "
suma=0
num1=0
num2=0
num3=0
resta=0
multiplicacion=0
divicion=0
nmayor=0
nmenor=0
nigual=0
DO WHILE opcion<>"salir"
opcion=" "
CLEAR
@1,14 say("Menu")
@3,2 say("suma")
@4,2say("resta")
@5,2say("multiplicacion")
@6,2say("division")
@7,2say("mayor menor")
@8,2say("salir")
@3,12 say("ingrese la opcion que decee usar")GET opcion
READ
IF opcion="suma"
CLEAR
@1,14say("suma")
@2,2say("ingrese un numero")GET num1
READ
@3,2say("ingrese otro numero")GET num2
READ
suma=num1+num2
@4,14 say("la suma es")
@5,14 say(suma)
ENDIF
IF opcion="resta"
CLEAR
@1,14say("resta")
@2,2say("ingrese un numero")GET num1
READ
@3,2say("ingrese otro numero")GET num2
READ
resta=num1-num2
@4,14 say("la resta es")
@5,14 say(resta)
ENDIF
IF opcion="multiplicacion"
CLEAR
@1,14say("multiplicacion")
num1=0
num2=0
res=0
r=0
re=0
@1,1 say("Ingrese primer numero") get num1
read
@2,1 say("Ingrese segundo numero") get num2
read
for i=1 to num2
res=r+num1
r=res
endfor
@3,1 say("Resultado:")
@3,20 say(r)
ENDIF
IF opcion="divicion"
CLEAR
@1,14say("divicion")
clear
num1=0
num2=0
@1,1 say("Ingrese el dividendo") get num1
read
@2,1 say("Ingrese el divisor") get num2
read
cont1=1
res=1
do while res>0
res=num1-num2*cont1
cont1=cont1+1
enddo
if res=0
cont1=cont1-1
@3,1 say("Resultado:")
@3,20 say(cont1)
endif
if res<0
cont1=cont1-2
@3,1 say("Resultado:")
@3,20 say(cont1)
endif
ENDIF
IF opcion="mayor menor "
CLEAR
@1,14say("mayor, menor o iguales")
@2,2say("ingrese un numero")GET num1
READ
@3,2say("ingrese otro numero")GET num2
READ
@4,2say("ingrese otro numero")GET num3
READ
if (num1<num2)and(num1<num3)
@6,2 say("el menor es")
@6,15 say(num1)
ENDIF
if (num2<num1)and(num2<num3)
@6,2 say("el menor es")
@6,15 say(num2)
ENDIF
if (num3<num2)and(num3<num1)
@6,2 say("el menor es")
@6,15 say(num3)
ENDIF
if (num1>num2)and(num1>num3)
@5,2 say("el mayor es")
@5,15 say(num1)
ENDIF
if (num2>num1)and(num2>num3)
@5,2 say("el mayor es")
@5,15 say(num2)
ENDIF
if (num3>num2)and(num3>num1)
@5,2 say("el mayor es")
@5,15 say(num3)
ENDIF
IF num1==num2
@7,2say("son iguales el 1r0 y el 2do")
ENDIF
IF num2==num3
@7,2say("son iguales el 2do y el 3ro")
ENDIF
IF num3==num1
@7,2say("son iguales el 1ro y el 2do")
ENDIF
ENDIF
READ
ENDDO
CLEAR
opcion=" "
suma=0
num1=0
num2=0
num3=0
resta=0
multiplicacion=0
divicion=0
nmayor=0
nmenor=0
nigual=0
DO WHILE opcion<>"salir"
opcion=" "
CLEAR
@1,14 say("Menu")
@3,2 say("suma")
@4,2say("resta")
@5,2say("multiplicacion")
@6,2say("division")
@7,2say("mayor menor")
@8,2say("salir")
@3,12 say("ingrese la opcion que decee usar")GET opcion
READ
IF opcion="suma"
CLEAR
@1,14say("suma")
@2,2say("ingrese un numero")GET num1
READ
@3,2say("ingrese otro numero")GET num2
READ
suma=num1+num2
@4,14 say("la suma es")
@5,14 say(suma)
ENDIF
IF opcion="resta"
CLEAR
@1,14say("resta")
@2,2say("ingrese un numero")GET num1
READ
@3,2say("ingrese otro numero")GET num2
READ
resta=num1-num2
@4,14 say("la resta es")
@5,14 say(resta)
ENDIF
IF opcion="multiplicacion"
CLEAR
@1,14say("multiplicacion")
num1=0
num2=0
res=0
r=0
re=0
@1,1 say("Ingrese primer numero") get num1
read
@2,1 say("Ingrese segundo numero") get num2
read
for i=1 to num2
res=r+num1
r=res
endfor
@3,1 say("Resultado:")
@3,20 say(r)
ENDIF
IF opcion="divicion"
CLEAR
@1,14say("divicion")
clear
num1=0
num2=0
@1,1 say("Ingrese el dividendo") get num1
read
@2,1 say("Ingrese el divisor") get num2
read
cont1=1
res=1
do while res>0
res=num1-num2*cont1
cont1=cont1+1
enddo
if res=0
cont1=cont1-1
@3,1 say("Resultado:")
@3,20 say(cont1)
endif
if res<0
cont1=cont1-2
@3,1 say("Resultado:")
@3,20 say(cont1)
endif
ENDIF
IF opcion="mayor menor "
CLEAR
@1,14say("mayor, menor o iguales")
@2,2say("ingrese un numero")GET num1
READ
@3,2say("ingrese otro numero")GET num2
READ
@4,2say("ingrese otro numero")GET num3
READ
if (num1<num2)and(num1<num3)
@6,2 say("el menor es")
@6,15 say(num1)
ENDIF
if (num2<num1)and(num2<num3)
@6,2 say("el menor es")
@6,15 say(num2)
ENDIF
if (num3<num2)and(num3<num1)
@6,2 say("el menor es")
@6,15 say(num3)
ENDIF
if (num1>num2)and(num1>num3)
@5,2 say("el mayor es")
@5,15 say(num1)
ENDIF
if (num2>num1)and(num2>num3)
@5,2 say("el mayor es")
@5,15 say(num2)
ENDIF
if (num3>num2)and(num3>num1)
@5,2 say("el mayor es")
@5,15 say(num3)
ENDIF
IF num1==num2
@7,2say("son iguales el 1r0 y el 2do")
ENDIF
IF num2==num3
@7,2say("son iguales el 2do y el 3ro")
ENDIF
IF num3==num1
@7,2say("son iguales el 1ro y el 2do")
ENDIF
ENDIF
READ
ENDDO
CLEAR
isaac_abadillo1- Mensajes : 11
Fecha de inscripción : 24/01/2009
Edad : 31
Localización : guate
Ejemplo de fox
http://www.megaupload.com/?d=4XNSGAOS
María_González20- Mensajes : 6
Fecha de inscripción : 24/01/2009
ej. de fox
http://www.megaupload.com/?d=M1NBQ9P1
Annaly_Castañeda9- Mensajes : 1
Fecha de inscripción : 24/01/2009
ejemplo
http://www.megaupload.com/?d=QXMGHQ6R
caroline_gomez19- Mensajes : 1
Fecha de inscripción : 24/01/2009
ejemplo de Josseline
http://www.megaupload.com/?d=3ZPM3AG3
María_González20- Mensajes : 6
Fecha de inscripción : 24/01/2009
Totito en form Alejandro
Totito en form
Alejandro_Hurtado29- Mensajes : 20
Fecha de inscripción : 22/01/2009
Edad : 32
Localización : Guatemala
ejemplo nery
ejemplo nery
nery_figueroa_18- Mensajes : 3
Fecha de inscripción : 31/01/2009
Edad : 30
Localización : gU▼Tm@l@
PROFE. IGNORE EL ANTERIOR PROGRAMA ESTE ES EL VERDADER EJEMPLO PARA EL VIERNES 27 DE MARZO
http://rapidshare.com/files/214011179/TAREA_PROGRAMA.rar.html
alexander_cos14- Mensajes : 11
Fecha de inscripción : 28/01/2009
Edad : 31
Localización : GUATEMALA
Programa para sacar el M.C.D
http://www.megaupload.com/?d=ARP8GKW1
Astrid Hernandez_25- Mensajes : 2
Fecha de inscripción : 12/02/2009
Modificador de palabras
http://www.megaupload.com/?d=DHU2SZBY
Marvin_Asijtuj5- Mensajes : 18
Fecha de inscripción : 22/01/2009
Edad : 31
Localización : Guatemala
ejemplo
este ejemplo es enviado de parte de Marcos Elias
http://www.megaupload.com/?d=EFVVX3KJ
http://www.megaupload.com/?d=EFVVX3KJ
Bryan_Andrino3- Mensajes : 7
Fecha de inscripción : 24/01/2009
Edad : 31
Localización : Guatemala
Aki esta el ejemplo
http://www.megaupload.com/?d=KQGXD3NZ
Lester_Adrian23- Mensajes : 6
Fecha de inscripción : 23/01/2009
Localización : Gutemala
Temas similares
» investigacion 2 taller
» Signo del Zodiaco
» proyectos taller 4to bimestre
» postear aqui
» PARA LOS CHAPINES DE CORAZON
» Signo del Zodiaco
» proyectos taller 4to bimestre
» postear aqui
» PARA LOS CHAPINES DE CORAZON
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.
|
|