Buscar este blog

miércoles, 29 de abril de 2015

Algoritmo de eliminacion de un registro en una tabla

Lic. Alfredo Enrique Zelaya Mejia
Contador y Auditor
Visite la pagina web aqui



ELIMINAR UN REGISTRO EN LA TABLA DE NOTAS



INICIO

**//TABLA LLENA

DEFINIR NOTAS$(N,10), CAR$, C=0, F=O, K1=0, K2=0, K3=1

LEER “CARNET A ELIMINAR:”, CAR$

HACER DESDE C=1 HASTA N,1

SI CAR$=NOTAS$(C,1) ENTONCES

HACER K1=KI+1

FIN SI

FIN HDHI

**//TAMAÑO DE LA TABLA AUXILIAR

K2=N-K1

DEFINIR NT$(K2,10)

**//ELIMINAR DATOS

HACER DESDE C=1 HASTA N,1

SI CARlt;>NOTAS$(C,1) ENTONCES

HACER DESDE F=1 HASTA 10,1

HACER NT$(K3,F)=NOTAS$(C,F)

FIN HDHI

HACER K3=K3+1

FIN SI

FIN HDHI

DEFINIR NOTAS$(K2,10)

HACER DESDE C=1 HASTA K2,1

HACER DESDE F=1 HASTA 10,1

HACER NOTAS$(C,F)=NT$(C,F)

FIN HDHI

HDHI

FIN

No hay comentarios:

Publicar un comentario