Seccion :: Programación

Enter your email address:

Delivered by FeedBurner

Arreglos y funciones PDF Print E-mail
Written by Diego Quispe   
Sunday, 15 June 2008
Arreglos y Funciones














/*programa ejemplo de arreglos y funciones*/
#include 
#include 
#include 
#define max 50
char menu();
void ingreso();
void ordena();
void listado();
void cuadro();
char nom [max][40];
char sex [max];
int n, nota [max];
main()
{
char op;
do
{
op=menu(); switch(op)  
.     {
case'1 ':ingreso();break;
case'2':ordena();break;
case'3':listado();break;
case'4':cuadro();break;
}
}
while(op!=5);
}
char menu()
{
char s;
clrscr();
textcolor(0+BLINK);textbackground(7);
gotoxy(30,5);cprintf(«menu»);
textcolor(7);textbackground(0);
gotoxy(30,7);printf(«[1]ingreso de dadtos»);
gotoxy(30,9);printf(«[2]ordena»);
gotoxy(30,11 );printf(«[3]listado»);
gotoxy(30,13);printf(«[4]cuadro»);
gotoxy(30,15);printf(«[5]terminar»);
gotoxy(35,17);printf(«opcion[]»);
do
{
gotoxy(43,17);
s=getche();
}
while(s<'1'lls>'51); return s;
}
/*ingreso de datos*/
void ingreso()
{
int k; clrscr();
printf («lngrese le numero de alumnos»); 
do
{ 
scanf(«%d»,&n);
}
while(n<1lln>max);
for(k=0;k20);
}
 }
/*funcion para listado*/ void listado()
{
int k;
clrscr();
printf(« El Nombre de tu Instituto \n\t\t PECI \n»);
printf(«                Relacion de alumnos\n»);
printf(«------------------------------------------------------
\n»); printf(« Nombre Sexo nota condicion\n»);
printf(«---------------------------------------------\n»);
for(k=0;kO)ph=anh/ch; else
if(ph==O) ph=O; if(cm>O)pm=anm/cm; else pm=0.0;
pg=(ph+pm)/2; /*irtiprecion de resultados*/ printf(«cuadro resumen»); printf(«relacion de alumnos»); printf(«nombre %s \n»,nom[k]); printf(«sexo %c \n»,sex[k]); printf(«nota %d \n»,nota[k]);
}
Tcuadro resumen*/
void ordena()
{
int p,v,tn;
char ts,tnom[30];
for(v=1;v
feed0 Comentarios

Escribir comentario
 
  smaller | bigger
 

busy
 
< Prev   Next >

CuscoMania.com

CuscoMania tu Portal Latino, aqui encontraras temas para pasat el tiempo talves leer algo relajante, galerias de fotos, de latinoamerica, información de muchos paises latinos Leer más acerca de CuscoMania.com

4x4Cuzco.com

Renta una Camioneta en la ciudad de Cusco con toda comodidad y seguridad, en diferentes modelos, nos especializamos en camionetas 4x4 ver pagina Web

Canal en Youtube

Visita mis ultimos Videos publicados en Youtube en el canal http://www.youtube.com/diquispe

Ingenieria Electronica

Pagina web oficial de la carrera profesional de ingenieria electronica UNSAAC, este es otro proyecto más de tecnodus donde tuvo gran participacion en su elaboracion y construccion, visitalo