Me aparece error pero no lo comprendo

[lolaiza]

Código [Seleccionar] Expandir

program Ordenando;
(con este programa se busca apilar el tope de elemento en dada, manteniendo su orden de menor a mayor)

{$INCLUDE/usr/ESTRUCTU}

var
  dada, ayuda1, ayuda2: fila;
  elemento: pila;
 
begin
  writeln('escriba numeros en orden de menor a mayor');
  inicfila(dada);
  writeln('escriba un numero');
  inicpila(elemento);
  readfila(ayuda1);
  readfila(ayuda2);
  while(not filavacia (dada)) do
      If(tope (dada) < tope (elemento)) or (tope (dada) = tope (elemento)) then
           Agregar (ayuda1, extraer (dada));
           else
           agregar(ayuda2, extraer (dada));
(como el usuario no habia suguerido nada para los numeros iguales al de elemento, los agrupe junto a los menores)
  while(not filavacia (ayuda1)) do
      agregar(dada, extraer (ayuda1);
  agregar(dada, desapilar (Elemento));
  while not filavacia (ayuda2) do
      agregar(dada, extraer (ayuda2);
  writefila(dada);
  writepila(elemento);
end.



Error(s):
source.pas(2,2) Fatal: Syntax error, "BEGIN" expected but "(" found
Error: /usr/bin/ppcx64 returned an error exitcode


[engel lex]

siempre es bueno de entrada, aclarar el lenguaje... pero de error el lenguaje lo que te dice es que hay un parentesis que no tiene sentido en la logica... justo donde está

Código [Seleccionar] Expandir

(con este programa se busca apilar el tope de elemento en dada, manteniendo su orden de menor a mayor)


para colocar eso debes ponerlo como comentario (no se que lenguaje es, así que no se como se comenta)

[Serapis]

Como te dice engel, el errorestá en la línea que es un comentario (hay otra más abajo) y que no sigue la estructura:

En Pascal, un programa empieza así:
<programa> = <cabecera de programa> ; <bloque de programa>
y...
<cabecera de programa> = "program" <identificador> (<identificador de fichero> {, <identificador de fichero>}) ;

...y los comentarios en Pascal son en esta forma:
<comentario> = "(*" <texto>|<empty> "*)"

En resumen te faltan los asteriscos tras el paréntesis de apertura y ante el paréntesis de cierre.

[lolaiza]

Mil gracias!!!!!!