elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Sigue las noticias más importantes de seguridad informática en el Twitter! de elhacker.NET


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  pascal: ";" expected but "ELSE" found pero no lo entiendo
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: pascal: ";" expected but "ELSE" found pero no lo entiendo  (Leído 8,065 veces)
lolaiza

Desconectado Desconectado

Mensajes: 7


Ver Perfil
pascal: ";" expected but "ELSE" found pero no lo entiendo
« en: 27 Abril 2018, 00:19 am »

ejercicio2.pas:21 Fatal: Syntax error, ";" expected but "ELSE" found


program procedimientos;  


procedure EliminarRepetidos (var A, B, C, D, E:  pila);
 begin
  if not pilavacia (A) and not pilavacia (B) then
    while not pilavacia (A) do
      if tope(A )= tope(B) then
       apilar (D, desapilar (A));
      else
       apilar (E, desapilar (A));
     apilar (E, desapilar (B));
   else
    if not pilavacia (A) then
      apilar (C, desapilar (A);
     else
      apilar (C, desapilar(B));

 end;


« Última modificación: 27 Abril 2018, 01:40 am por lolaiza » En línea

engel lex
Moderador Global
***
Desconectado Desconectado

Mensajes: 15.514



Ver Perfil
Re: pascal: ";" expected but "ELSE" found pero no lo entiendo
« Respuesta #1 en: 27 Abril 2018, 00:21 am »

Código
  1. procedure EliminarRepetidos (var A, B, C, D, E:  pila);
  2. begin
  3.  if not pilavacia (A) and not pilavacia (B) then
  4.    while not pilavacia (A) do
  5.      if tope(A )= tope(B) then
  6.       apilar (D, desapilar (A)) <--------------- Error de sintaxis, se esperaba ";" pero se consiguió "else"
  7.      else
  8.       apilar (E, desapilar (A));
  9.   apilar (E, desapilar (B));
  10.   else
  11.    if not pilavacia (A) then
  12.      apilar (C, desapilar (A);
  13.     else
  14.      apilar (C, desapilar(B));
  15. end;


tema corregido (los codigos deben llevar etiquetas GeSHi) y elimiado el otro tema por ser duplicado


« Última modificación: 27 Abril 2018, 00:24 am por engel lex » En línea

El problema con la sociedad actualmente radica en que todos creen que tienen el derecho de tener una opinión, y que esa opinión sea validada por todos, cuando lo correcto es que todos tengan derecho a una opinión, siempre y cuando esa opinión pueda ser ignorada, cuestionada, e incluso ser sujeta a burla, particularmente cuando no tiene sentido alguno.
lolaiza

Desconectado Desconectado

Mensajes: 7


Ver Perfil
Re: pascal: ";" expected but "ELSE" found pero no lo entiendo
« Respuesta #2 en: 27 Abril 2018, 02:14 am »

ya probé y me sigo apareciendo el error
En línea

Serapis
Colaborador
***
Desconectado Desconectado

Mensajes: 3.351


Ver Perfil
Re: pascal: ";" expected but "ELSE" found pero no lo entiendo
« Respuesta #3 en: 27 Abril 2018, 02:54 am »

La sentencia 'while', exige una 'repeat', y no una 'else'

...y por favor, cuando pongas código sea del lenguaje que sea, usa las 'etiqeutas GESHI, que aparece en la ventana de redacción del mensaje... eliges el lenguaje adecuado y pegas el código, dentro así resultará más claro y legible.

(las etiquetas también puedes escribirlas a mano... son las siguientes, he añadido un espacio después de '[' para que resulten visibles).

[ code=pascal]
   Tu código aquí dentro...
[ /code]
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines