PROGRAMACION IV
BACH. TEC. N° 16
LUIS ALBERTO JAIME PARRA
6° B
/* BACHILLERATO TEC. Nø16 */
/* 6ø SEM. GRUPO:"B" */
/* PROGRAMACION IV */
/* LUIS ALBERTO JAIME PARRA */
/* PROGRAMA QUE CREA UN ARCHIVO DE TEXTO Y GRABA LA PALABRA "HOLA COMO ESTAS" */
#include <conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
void main()
{
clrscr();
FILE *punta;
int a,b,c,x;
char st;
char strg[16]="HOLA COMO ESTAS";
c=0;
punta=fopen("pingui.txt","r+");
if (punta==NULL)
{
punta=fopen("pingui.txt","w+");c=1;
}
for (b=1;b<=16;b++)
{
st=strg[b-1];
printf("%c",st);
fputc(st,punta);
}
if (c==1)
{
freopen("pingui.txt","w+",punta);
}
else freopen("pingui.txt","r+",punta);
getch();
}
/* BACHILLERATO TEC. Nø16 */
/* 6ø SEM. GRUPO:"B" */
/* PROGRAMACION IV */
/* LUIS ALBERTO JAIME PARRA */
/* PROGRAMA QUE CREA UN ARCHIVO DE TEXTO Y GRABA LO QUE TU QUIERAS EN EL ARCHIVO TXT */
#include<stdio.h>
#include<conio.h>
#include<stdlib.h>
void main()
{
char caracter;
FILE *punta;
clrscr();
if (!(punta=fopen("pingui.txt","w+")))
{
cprintf("NO SE PUEDE ABRIR EL ARCHIVO");
exit(0);
}
else
do
{
caracter=getche();
fputc(caracter,punta);
}
while(caracter!=char(13));
fclose(punta);
}
/* BACHILLERATO TEC. Nø16 */
/* 6ø SEM. GRUPO:"B" */
/* PROGRAMACION IV */
/* LUIS ALBERTO JAIME PARRA */
/* PROGRAMA QUE LEE UN ARCHIVO */
#include<stdio.h>
#include<conio.h>
#include<stdlib.h>
void main()
{
char caracter;
FILE *pinguiman;
clrscr();
if (!(pinguiman=fopen("pingui.txt","r")))
{
cprintf("NO SE PUEDE ABRIR EL ARCHIVO");
exit(0);
}
else
do
{
caracter=fgetc(pinguiman);
cprintf("%c",caracter);
}
while(!feof(pinguiman));
getch();
fclose(pinguiman);
}
/* BACHILLERATO TEC. Nø16 */
/* 6ø SEM. GRUPO:"B" */
/* PROGRAMACION IV */
/* LUIS ALBERTO JAIME PARRA */
#include<stdio.h>
#include<conio.h>
#include<stdlib.h>
void main()
{
int ascii[255];
int x;
char caracter;
FILE *pta;
clrscr();
for(x=0;x<=254;x++)
ascii[x]=0;
if (!(pta=fopen("pingui.txt","r")))
{cprintf("error al abrir el archivo");
exit(0);
}
else
do
{
caracter=fgetc(pta);
ascii[(int(caracter))]+=1;
cprintf("%c",caracter);
}
while(!feof(pta));
getch();
x=0;
clrscr();
while(x<=254)
{
cprintf(" %c ",char(x));
cprintf(" %d ",ascii[x]);
x++;
}
getch();
fclose(pta);
}
/* BACHILLERATO TEC. Nø16 */
/* 6ø SEM. GRUPO:"B" */
/* PROGRAMACION IV */
/* LUIS ALBERTO JAIME PARRA */
#include <conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
void main ()
{
clrscr();
int a,b,c,z[255];
char car[200];
for (a=0;a<=254;a++)
{
z[a]=0;
}
char k;
FILE *punta1;
FILE *punta2;
punta2=fopen("pingui.txt","r+");
if (punta2==NULL)
{
cprintf("Error: No Existe");
exit(0);
}
punta1=fopen("pinguiman.txt","r+");
if (punta1==NULL)
{
punta1=fopen("pinguiman.txt","w+");
}
do
{
fgets(car,200,punta2);
printf("%s",car);
strupr(car);
printf("%s",car);
fputs(car,punta1);
}
while(!feof(punta2));
fclose (punta1);
freopen("pingui.txt","r+",punta2);
getch();
}
COMENTARIOS: ME ATORE EN EL ULTIMO Y NO SE SI EL PROGRAMA CUATRO ESTE MAL TENGO DUDA ME REVOLVI UN POCO
POR QUE ESA VES LLEGE TARDE A LA CLASE.