ayuda free pascal
4 participantes
Página 1 de 1.
ayuda free pascal
ps ahora es con esto
lo usamos en la escuela y nos pusieron a hacer esto
ke se trata de deponer la clave de acceso
program ClaveDeAcceso;
var
ClaveCorrecta, Intento: String[30];
begin
ClaveCorrecta := 'PaskalForever';
repeat
WriteLn( 'Introduce la clave de acceso...' );
ReadLn( Intento )
until Intento = ClaveCorrecta
(* Aquí iría el resto del programa *)
eso ya lo ise perolo ke kieren ke agamos es
# Mejorar el programa de la clave de acceso para que avise de que la clave no es correcta.
# Mejorar más todavía para que sólo haya tres intentos.
y no se como si alguien mepudeira explicar
gracias
http://www.freepascal.es/tutorials/cupas06.php
lo usamos en la escuela y nos pusieron a hacer esto
ke se trata de deponer la clave de acceso
program ClaveDeAcceso;
var
ClaveCorrecta, Intento: String[30];
begin
ClaveCorrecta := 'PaskalForever';
repeat
WriteLn( 'Introduce la clave de acceso...' );
ReadLn( Intento )
until Intento = ClaveCorrecta
(* Aquí iría el resto del programa *)
eso ya lo ise perolo ke kieren ke agamos es
# Mejorar el programa de la clave de acceso para que avise de que la clave no es correcta.
# Mejorar más todavía para que sólo haya tres intentos.
y no se como si alguien mepudeira explicar
gracias
http://www.freepascal.es/tutorials/cupas06.php
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
ay weyyyy quien fregados enseña pascal en estos dias jaja nop en esta si no puedo ayudar..................
Re: ayuda free pascal
ESCASTO escribió:ay weyyyy quien fregados enseña pascal en estos dias jaja nop en esta si no puedo ayudar..................
jaja ps en la escuela we no es mi culpa
jaja
y tengo ke terminar los trabajos son 3 putos!!! jaja
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
ps como dice escasto kien coños enseña pascal en estos dias jeje pero en fin ayudarte con el codigo sera dificil por que ni idea de como sea la sintaxis de pascal pero de manera general ps piensale asi
begin
ClaveCorrecta := 'PaskalForever';
contador=0; //esta variable llevara el numero de intentos
repeat
WriteLn( 'Introduce la clave de acceso...' );
ReadLn( Intento )
SI(intento igual a clavecorrecta) // no se cual sea la sintaxis en pascal
contador=3; //le ponemos el valor de 3 para que rompa el ciclo
SINO
WriteLn(Clave no valida);
contador=contador +1;
until contador=3;
Al final si tecleaste mal la clave 3 veces te sacara del bucle igual que si la tecleas bn por lo que debes checar que si la tecleas mas 3 veces te sake del programa y no continue pero eso ya es dependiendo de como sea todo tu programa
begin
ClaveCorrecta := 'PaskalForever';
contador=0; //esta variable llevara el numero de intentos
repeat
WriteLn( 'Introduce la clave de acceso...' );
ReadLn( Intento )
SI(intento igual a clavecorrecta) // no se cual sea la sintaxis en pascal
contador=3; //le ponemos el valor de 3 para que rompa el ciclo
SINO
WriteLn(Clave no valida);
contador=contador +1;
until contador=3;
Al final si tecleaste mal la clave 3 veces te sacara del bucle igual que si la tecleas bn por lo que debes checar que si la tecleas mas 3 veces te sake del programa y no continue pero eso ya es dependiendo de como sea todo tu programa
oXBAo MEFISTO- Miembro activo
- Cantidad de envíos : 309
Edad : 37
Localización : Mexico D.F.
Fecha de inscripción : 28/03/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
for := < valor_inicial > to < valor_final > do
begin
< bloque_de_instrucciones >
end
No seria asi ?? jaja tendrias q asigarles valores inciales y valores finales pero igual que mefisto no se cual sea la sintaxis de pascal, por lo que veo es similar a TurboC, por cierto que compilador usas Jsmr???.................
begin
< bloque_de_instrucciones >
end
No seria asi ?? jaja tendrias q asigarles valores inciales y valores finales pero igual que mefisto no se cual sea la sintaxis de pascal, por lo que veo es similar a TurboC, por cierto que compilador usas Jsmr???.................
Re: ayuda free pascal
OK LEYENDO LA PAGINA QUE PUSISTE PERESE QUE NO SE VALE USAR EL IF(LA CONDICION QUE YO TE PUSE) JEJEJEJ PS SIENDO ASI DEBES USAR UN WHILE
MIENTRAS (LA CLAVE NO SEA IGUAL A LA CORRECTA O EL NUMERO DE INTENTOS SEA MENOR A 3)
HAZ AKI PONES LO MISMO QUE TENIAS CON LA DIFERENCIA QUE EN LA VARIABLE QUE USES PARA CONTAR EL NUMERO DE INTENTOS LA VAYAS AUMENTANDO EN 1
MIENTRAS (LA CLAVE NO SEA IGUAL A LA CORRECTA O EL NUMERO DE INTENTOS SEA MENOR A 3)
HAZ AKI PONES LO MISMO QUE TENIAS CON LA DIFERENCIA QUE EN LA VARIABLE QUE USES PARA CONTAR EL NUMERO DE INTENTOS LA VAYAS AUMENTANDO EN 1
oXBAo MEFISTO- Miembro activo
- Cantidad de envíos : 309
Edad : 37
Localización : Mexico D.F.
Fecha de inscripción : 28/03/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
mmmmmm pasacal? forever?mmmmmmmmmse me hace que tus profesores son los pastelosos y tu de ahi te educateeeeeeeeeeeeeeeeeeeeeeeeesnnnnn
oXBAo ZEITGEIST- Miembro V.I.P.
- Cantidad de envíos : 5003
Edad : 47
Localización : Distrito Federal
Fecha de inscripción : 18/02/2009
Guerrero :
Jades :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
aahhhh
ps no se ake te refieres con copilador escasto
y nos puso otro ejemplo ke es el ke viene mas abajo de la pagina ke puse
es de adivinar numeros
pero no le entiendo ni madres
pero algo delo ke entendi es
poner una variable ke se llame intentoact( ke seria intento actual
y poner
algo mas pero yano recuerdo
(ni yomismo me entendi) jeje
ah y mephisto no te entendi nada
esto necesita mucha concentracion dijo el profe
jaja
ps no se ake te refieres con copilador escasto
y nos puso otro ejemplo ke es el ke viene mas abajo de la pagina ke puse
es de adivinar numeros
pero no le entiendo ni madres
pero algo delo ke entendi es
poner una variable ke se llame intentoact( ke seria intento actual
y poner
algo mas pero yano recuerdo
(ni yomismo me entendi) jeje
ah y mephisto no te entendi nada
esto necesita mucha concentracion dijo el profe
jaja
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
Compilador es el programa que usas para crear codigo en tu caso es Pascal......................
Re: ayuda free pascal
jSmR13 escribió:
esto necesita mucha concentracion dijo el profe
jaja
ps mi buen jsmr no me lo tomes a mal y no lo digo en forma grocera pero creo que debes estudiar un poco mas por que realmente lo que te estan dejando de tarea no es dificil si tu profe les pidio eso en pascal es por que algo debieron de ver en clase por lo tanto tu debrias de tratar de hacerlo y no pedir que te lo hagan los demas como dige al principio no es en mala onda como viste uno trata de ayudarte pero tu tmb devbes esforzarte un poco mira que el ser estudiante no creas que es cosa facil (un poco filosofico) SER ALUMNO CUALKIERA PERO ESTUDIANTE NO TODOS jejeje comento esto por que si no supiste responderle a escasto que compilador usas ps me imagino que no le das mucha importancia a esta materia una vez mas espero no ofendrte creeme que no es mi intencion
oXBAo MEFISTO- Miembro activo
- Cantidad de envíos : 309
Edad : 37
Localización : Mexico D.F.
Fecha de inscripción : 28/03/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
jaja ni pedo we no me ofendooXBAo MEFISTO escribió:jSmR13 escribió:
esto necesita mucha concentracion dijo el profe
jaja
ps mi buen jsmr no me lo tomes a mal y no lo digo en forma grocera pero creo que debes estudiar un poco mas por que realmente lo que te estan dejando de tarea no es dificil si tu profe les pidio eso en pascal es por que algo debieron de ver en clase por lo tanto tu debrias de tratar de hacerlo y no pedir que te lo hagan los demas como dige al principio no es en mala onda como viste uno trata de ayudarte pero tu tmb devbes esforzarte un poco mira que el ser estudiante no creas que es cosa facil (un poco filosofico) SER ALUMNO CUALKIERA PERO ESTUDIANTE NO TODOS jejeje comento esto por que si no supiste responderle a escasto que compilador usas ps me imagino que no le das mucha importancia a esta materia una vez mas espero no ofendrte creeme que no es mi intencion
todo los dias estoy viendo ave rke le muevo
y la pregunta de escasto del copilador
es por ke la netha no sabia ke es copilador y no es por no darle importancia ala materia( si no no tuviera 10 en los primeros dos bimestres jaja:D ?
pero el pedo eske ya seke no es dificl osea lo p uede aser tomando otros de ejemplos
pero eske el profe no me explika como ponerlos o utilizarlos
ese es el pedo
pero todo bn
ua
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
ahh y sie so si lo vimos pero casi nadie lo termina al menos somos unos 6
y otros ke kopian los trabajos jaja
pero muchos como yo nos kedamos aka kon alguna duda
y con algo asi
pero ala gaver ke verguenza preguntar jaja
y otros ke kopian los trabajos jaja
pero muchos como yo nos kedamos aka kon alguna duda
y con algo asi
pero ala gaver ke verguenza preguntar jaja
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
ya casi lo termino!! jaja
me sale ke la clavee es incorrecta
pero se pasa de los tres intentos
y cuando le pongo bien sale clave incorrecta y se sale del programa
jaja
ya casi lo termino tengo asta el jueves para terminarlo ys akarme mi 10
uuu
me sale ke la clavee es incorrecta
pero se pasa de los tres intentos
y cuando le pongo bien sale clave incorrecta y se sale del programa
jaja
ya casi lo termino tengo asta el jueves para terminarlo ys akarme mi 10
uuu
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
lo iseeeeeeeeee
ala madre
mela rife
ahorita estaba aka y me salio crei ke me faltaria pero no
uuuuuu
ahora esperare a mañana para ke me pongan mis trs pu ntos
y tener 10
y mantener mi racha de 3 bimestres consekutivos con 10
ala madre
mela rife
ahorita estaba aka y me salio crei ke me faltaria pero no
uuuuuu
ahora esperare a mañana para ke me pongan mis trs pu ntos
y tener 10
y mantener mi racha de 3 bimestres consekutivos con 10
jSmR13- Miembro importante
- Cantidad de envíos : 1003
Edad : 28
Localización : nogales, sonora
Fecha de inscripción : 03/05/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Re: ayuda free pascal
yeahh eso es todo mi buen jsmr todo es cosa de chingarle un pokito vientos vientos
oXBAo MEFISTO- Miembro activo
- Cantidad de envíos : 309
Edad : 37
Localización : Mexico D.F.
Fecha de inscripción : 28/03/2009
Guerrero :
Jades :
Mascaras :
Aniversario :
Sangre :
Batallon :
Temas similares
» PARKOUR FREE RUNNING
» Ayuda!!!!!
» ayuda con regalo :)
» ayuda con la RECONNNNN
» COD 4 ayuda con el juego
» Ayuda!!!!!
» ayuda con regalo :)
» ayuda con la RECONNNNN
» COD 4 ayuda con el juego
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.
|
|