ZONA EXTREMA
LA PRACTICA HACE AL MAESTRO

examen 2..de compiladores(muestra una cadena alreves)

#include
#include
#include
#include
#include
#include
FILE *arch;
char palabra[100]; int i;
// mostrar los datos de un archivo
void mostrar()
{
clrscr();
arch=fopen(“c:5tosist/exam2p.txt”,”r”);
if (arch==NULL){
puts(“no se encuentra elarchivo”);
getch();
exit(0); }
else{
int i=1;
while(!feof(arch)){
fgets(palabra,100,arch);
gotoxy(30,1+i);
puts(“palabra”);
i=i+1;
}
fclose(arch);
getch();
}
}
//agregar datos al archivo
void agregar()
{
clrscr();
arch=fopen(“c:/5tosist/exam2p.txt”,”a+”);
if (arch==NULL){
puts(“se agrego elemento al archivo”);
getch();
exit(0);}
else{
clrscr();
puts(“escribe un nombre”);
gets(palabra);
strrev(palabra);
fprintf(arch,”%s\n”,palabra);
}
getch();
fclose(arch);
}
//crear un archivo
void crear()
{
clrscr();
arch=fopen(“c:/5tosist/exam2p.txt”,”w”);
if (arch==NULL){
puts(“no se pudo crear el archivo”);
getch();
exit(0);}
else{
puts(“archivo creado”);}
getch();
fclose(arch);
}
//Menu de opciones
void menu()
{
int op=0;
while (op!=4){
clrscr();
puts(” MENU PRINCIPAL “);
puts(“1. Crear un archivo”);
puts(“2. Agregar datos”);
puts(“3. Mostrar datos”);
puts(“4. Salir”);
puts(“Elige una opcion____ “);
scanf(“%d”,&op);
switch(op){
case 1: crear();
break;
case 2: agregar();
break;
case 3: mostrar();
break;
case 4: clrscr();
puts(“Adios”);
break;
default:clrscr();
puts(“Opcion inexistente”);
}
getch();
}
}

//ejecucion de menu
void main()
{
clrscr();
menu();
}

Ninguna respuesta to “examen 2..de compiladores(muestra una cadena alreves)”

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: