1.- Inicio
ofstream archivo;
archivo.open("C:\\datos\\ejemplo.txt")
if(archivo.bad())
{
Print " No puede crear el archivo ejemplo.txt ";
}
else
{
archivo , 1 ," ", 50 , " Reprobado ";
archivo , 2 ," ", 0 , " Ausente ";
archivo , 3 ," ", 80 , " Aprobado ";
archivo , 4 ," ", 100 ," Aprobado ";
archivo.close()
}
Print " Datos guardados exitosamente "
Fin
Problema 2
1.- Inicio
ifstream arch1;
 calif,i           int
 cadena[10]      char
arch1.open("C:\\datos\\ejemplo.txt");
if(arch1.bad())
{
Print " Incapaz de crear o abrir el archivo ";
}
else
{
arch1 , i;
while(!arch1.eof())
{
Print  i ,"     ";
arch1 , calif;
Print calif ," \t ";
arch1 , cadena;
Print  cadena ;
arch1 , i;
}
arch1.close()
}
Fin
Problema 3
1.- Inicio
fstream f1;
 cadena[10],sigue,nombre[5][10];     char
 c1,c2,c3,c4,i=0;       int 
 promedio;      int
 opcion;     int
f1.open("C:\\datos\\ejemplo2.txt",ios::out);
do{
Print " 1) Almacenar datos del alumno : "<<endl;
Print " 2) Reporte de alumnos : "<<endl;
Print " 3) Salida de programa : "<<endl;
Print " Elige opcion : ";
Read opcion;
switch(opcion)
{
case 1:
do
{
Print " Nombre alumno : "<<(i+1)<<" : ";
Read  nombre[i];
Print " Calificacion 1 : ";
Read  c1;
Print " Calificacion 2 : ";
Read  c2;
Print " Calificacion 3 : ";
Read  c3;
Print " Calificacion 4 : ";
Read c4;
promedio = (c1+c2+c3+c4)/4;
f1,nombre," ",c1," ",c2," ",c3," ",c4," ",promedio," ;
if(promedio>=70)
{
f1,"Aprobado";
Print "*Aprobado";
}
else{
f1,"Reprobado"l;
Print "**Reprobado";
}
Print "Desea registrar a otro(s/n)";
Read sigue;
}
while(sigue=='s' || sigue=='S');
f1.close();
break;
case 2:
f1.open("C:\\datos\\ejemplo2.txt",ios::app);
Print "Nombre   Calif 1  Calif 2  Calif 3  Calif 4  Promedio";
if(f1.bad())
{
Print "Incapaz de crear o abrir el archivo";
}
else{
f1,nombre[i];
while(!f1.eof());
{
Print nombre[i+1]," ";
f1,c1;
Print c1,"\t";
f1,c2;
Print c2,"\t";
f1,c3;
Print c3, "\t";
f1>>c4;
Print c4,"\t";
f1,promedio;
Print promedio,"\t";
f1>>cadena;
Print cadena,"\t";
f1,nombre[i];
}
}
f1.close();
break;
case 3: Print"Salida Programa";
break;
default: Print ,"Error en Opcion";
break;
}
}
while(opcion !=3)
Fin.
Problema 4
Un archivo llamado polar.txt contiene las coordenadas pobres nesesarias en un programa de graficas.Actualmente este archivo contiene los siguientes datos.
 
 
                  Distancia (Pulgadas)          Angulo (Grados)      
             2.0                              45.0
             6.0                              30.0
            10.4                             45.0
             4.0                              60.0
            12.0                             55.0
             8.0                              15.0
a) Escriba u programa para crear este archivo.
b) Con base al archivo polar.txt escriba un programa que acepte del usuario los datos de distancia y angulo y los agregue al final del archivo.
c) Con el archivo polar. txt escriba u programa que lea este archivo y cree otro llamado xycord.txt las entradas al nuevo archivo deben contener las coordenadas rectangulares que corresponden a  las coordenadas polares.
x=ycoseno
y=rseno
Donde r es la coordenada de distancia y 
 es el equivalente en radianes a la coordenada del angulo en el archivo polar.txt.
1.- Inicio
void crearchivo()
{
fstream escribir;
escribir.open("C://datos//polar.txt",ios::out);
escribir , 2.0 ,"   ", 45.0; 
         , 6.0 ,"   ", 30.0 ;
         , 10.0 ,"   ", 45.0; 
         , 4.0 ,"   ", 60.0 ;
         , 12.0 ,"   ", 55.0 ;
         , 8.0 ,"   ", 15.0 ;
escribir.close();
}
void agregard()
{
 dist,angulo      float
 continuar      char
fstream escribir;
escribir.open("C://datos//polar.txt",ios::app);
do
{
Print " Distancia (Pulgadas): ";
Read dist;
Print " Angulo (Grados): ";
Read angulo;
escribir , dist ,"     ",angulo;
Print " Deseas registrar otro (S/N):";
Read continuar;
}
while (continuar=='S'||continuar=='s');
escribir.close();
}
void crearxycord()
{
float d,a,x,y,rad;
fstream f1;
fstream f2;
f1.open ("C://datos//polar.txt",ios::in);
f2.open ("C://datos//xycord.txt",ios::out);
f1,d;
while (!f1.eof())
{
f1,a;
rad = (a*3.1416)/180;
x = d*cos(rad);
y = d*sin(rad);
f2,x,"  ",y;
f1,d;
Print  x ," : ", y ;
}
f1.close()
f2.close()
}
void main()
{
crearchivo()
agregard ()
crearxycord ()
Fin.
Problema 5
Escriba los cuatro numeros reales 
92.65
88.72
77.46
82.93
92.65
88.72
77.46
82.93
en un archivo texto llamado resultados.Despues de escribir los datos en el archivo el programa debe leerlos determinar y desplegar el promedio de los cuatro numeros leidos. 
1.- Inicio
 num;    float
fstream archivo;
archivo.open("c://datos//resultados.txt",ios::out,ios::in);
archivo , 92.65 , "      ", 88.72 , "      ", 77.46 , "     " 82.93;
archivo.close();
float suma = 0;
archivo.open("c://datos//resultados.txt",ios::in);
for(int i=1;i<=4;i++)
{
archivo , num;
Print num,"  ";
suma = suma + num;
}
;
 promedio = suma/4.0;    float
Print " El promdio es : ",promedio;
Fin.
Problema 6
1.- Inicio
void ordenar (int n,char x[10][12])
{
 temp[12];     char
 i,elem;      int
for(elem=0;elem<(n-1);elem++)
{
for(i=elem+1;i<(n-1);i++)
{
if(strcmpi(x[elem],x[i])<0)
{
strcpy(temp,x[elem]);
strcpy(x[elem],x[i]);
strcpy(x[i],temp);
} } } }
void main ()
{
 i,n=0;     int
 x[10][12];    char
Print " Escribe fin para terminar ";
do
{
Print " Cadena ",(n+1)," : ";
Read x[n];
}
while(strcmpi(x[n++]," Fin "));
ordenar(--n,x);
Print " Lista Ordenar Cadena ";
for(i=0;i<n;i++)
{
Print x[i] ;
}
Fin.