soporteabe
Becerro
- Desde
- 4 Ago 2008
- Mensajes
- 4
- Tema Autor
- #1
amigos necesito de su ayuda tengo este problema pasar este codigo de turbo c a visual basic o visual c.
#include <stdio.h>
#include <conio.h>
Void main ( )
{
Int ca[5],x,sum=0,li,acre=0,rep=0,g,w;
Float pro;
Clrscr ( );
Gotoxy (2,2 )printf (“IESCH”);
Gotoxy ( 2,4 ) printf(“ESTADISTICA”);
Gotoxy ( 2,8 ) printf(B.DATO”);
Gotoxy ( 2,12 ) printf(“COMPILADORES”);
Gotoxy ( 2,10 ) printf(“ECONOMIA”);
(“INTERFAZ”);
fa(x=0,x<=4;>++)
{
Gotoxy(18,4+x*4);scanf(“%”,d”,d ca[x];
li++;
sum=sum+ca[x];
if(ca[x]>=6)
acre++;
else
rep++;
pro=sum/5;
}
Gotoxy (4,40 )printf (“el promedio es%f”,pro);
Gotoxy (41,42 )printf (“acreditado es%d”,acre);
Gotoxy (41,44 )printf (“reprobado%d”,rep);
For(x=0;x<=4;x++)
{
W=ca[x]*2;
If(ca[ x]<6)texcolor(4);
Else texcolor(9);
For(g=20;g<w+20;g++)
{
Gotoxy(g,4+x*4);cprintf(“a+1>19”);
}
}
Getch( );
}
gracias amigos:vientos:
#include <stdio.h>
#include <conio.h>
Void main ( )
{
Int ca[5],x,sum=0,li,acre=0,rep=0,g,w;
Float pro;
Clrscr ( );
Gotoxy (2,2 )printf (“IESCH”);
Gotoxy ( 2,4 ) printf(“ESTADISTICA”);
Gotoxy ( 2,8 ) printf(B.DATO”);
Gotoxy ( 2,12 ) printf(“COMPILADORES”);
Gotoxy ( 2,10 ) printf(“ECONOMIA”);
(“INTERFAZ”);
fa(x=0,x<=4;>++)
{
Gotoxy(18,4+x*4);scanf(“%”,d”,d ca[x];
li++;
sum=sum+ca[x];
if(ca[x]>=6)
acre++;
else
rep++;
pro=sum/5;
}
Gotoxy (4,40 )printf (“el promedio es%f”,pro);
Gotoxy (41,42 )printf (“acreditado es%d”,acre);
Gotoxy (41,44 )printf (“reprobado%d”,rep);
For(x=0;x<=4;x++)
{
W=ca[x]*2;
If(ca[ x]<6)texcolor(4);
Else texcolor(9);
For(g=20;g<w+20;g++)
{
Gotoxy(g,4+x*4);cprintf(“a+1>19”);
}
}
Getch( );
}
gracias amigos:vientos: