- Quisiera ver si me pueden ayudar por que necesito hacer un programa en Pascal que calcule cuantas horas, cuantos minutos y cuantos segundos hay en 3700 segundo
- Sitios web sobre Turbo Pascal, donde pueda conseguir una libreria para el control de mouse?
- Conoces el lenguaje de turbo pascal?
- Como conseguie un manual o tutorial de turbo pascal?
PASCAL: Dudas y Preguntas
Lenguaje de PASCAL: Dudas y Preguntas
Suscribirse a:
Comentarios de la entrada (Atom)
3 comentarios:
Hola:
Les invitamos a Maestros en línea
http://samoga.ning.com/
Nos gustaría que participases.
Un saludo
Jesús
http://creaconlaura.blogspot.com
Excelente blog! felicitaciones :):):):):):)
problemita con un proceso de pascal
procedure AgregarMed;
var
arch:medicamentos;
reg:medicamento;
begin
assign(arch,'medicamentos');
reset(arch);
seek(arch,filesize(arch));
writeln('***Agregar medicamento***');
writeln;
write('Ingresar nombre: '); readln(reg.nom);
write('Ingresar presentacion: ');readln(reg.pres);
write('Ingregar vencimiento: ');readln(reg.vencimiento);
write('Ingresar stock: ');readln(reg.stock);
writeln;
write(arch,reg);
close(arch);
end;
el codigo q acabo de escribir aparentemente deberia:
1.A la variable archivo "arch" se le asigno 'medicamentos'
2.Me posiciono sobre el principio del archivo
3.Con el comando seek me dirijo al final del archivo para poder ingresar otro nuevo registro
4.Lleno el registro los campos del registro.
5.Escribo el nuevo registro sobre el archivo
6.cierro el archivo
esos pasos creo q son los correctos para poder agregar un registro al archivo ya existente,. el problema es q cuando vuelco los datos a texto tanto sea imprimiendolos en pantalla para poder ver el contenido el archivo, el registro nuevo no se incorporo al archivo original.
agradeceria una pronta respuesta, correcion o lo q sea para mi codigo
gracias =)
Publicar un comentario