Constante
n = 3; m = 4;
Definir variables
a:array:= s 1 ;
Fin;
Fin;
Si no se encuentra, entonces
writeln('No existe tal elemento.')
p>Otro
For i := 1 to n do
if f, ']= ', a]);
Fin.
Constante
n = 3; m = 4;
Definir variables
a:array:= s 1 ;
Fin;
Fin;
Si no se encuentra, entonces
writeln('No existe tal elemento.')
p>Otro
For i := 1 to n do
if f, ']= ', a]);
Fin.