Foros del Web » Programación para mayores de 30 ;) » Programación General »

Programación Turbo Pascal - Abrir un video

Estas en el tema de Programación Turbo Pascal - Abrir un video en el foro de Programación General en Foros del Web. Hola a tod@s: Hace 2 días que llevo con este programa y con ayuda de un amigo he podido crear un programa que me permite ...
  #1 (permalink)  
Antiguo 27/07/2011, 05:52
 
Fecha de Ingreso: julio-2011
Mensajes: 1
Antigüedad: 12 años, 8 meses
Puntos: 0
Programación Turbo Pascal - Abrir un video

Hola a tod@s:

Hace 2 días que llevo con este programa y con ayuda de un amigo he podido crear un programa que me permite introducir un codigo y SI no es correcto pues me vuelve a preguntar y si es correcto pues finaliza el programa.

Quisiera añadir, cuando introduces el codigo correcto, que se abra automáticamente un archivo de video.

Se los agradecería enormemente, es para una sopresa a un amigo que estoy haciendole un juego....

Este es mi programa:

PROGRAM RUBEN;
VAR
PASS, PASS1: STRING;
BEGIN
PASS:='VISTAFLOR';
WHILE PASS<>PASS1 DO
BEGIN
WRITE ('ESCRIBE EL CODIGO: ');
READLN (PASS1);
IF PASS<>PASS1 THEN
BEGIN
WRITELN ('ERROR INTRODUCE CODIGO');
END;
END;
IF PASS=PASS1 THEN
BEGIN
WRITELN ('LA CONTRASEÑA ES CORRECTA');
END;
END.



Muchas gracias.

Etiquetas: pascal, programa, turbo, video
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:02.