PRACTICA EXTRA
Exámen
1.- Inicio
i,max,sumpos=0,sumneg=0,numero,cp=0,cn=0; int
Print " Cuantos Numeros = ";
Read max;
for(i=1;i<=max;i++)
{
Print " Numero entero : ";
Read numero;
if (numero<0)
{
sumneg = sumneg+numero;
cn = cn+1;
}
else
{
if(numero>0)
{
sumpos = sumpos+numero;
cp = cp+1;
}
}
}
Print " Promedio de numeros positivos = ",(sumpos/cp);
Print " Promedio de numeros negativos = ",(sumneg/cn);
Fin.

1.- Inicio
tf = 40,l=7365; int
a = 11.7e-6,longitud; real
t0 = 0; real
Print " Grados Longitud Expandida ";
while(t0<40)
{
longitud = a*l*(tf-t0);
Print t0<<" ",longitudl;
t0 = t0+5;
}
Fin

1.- Inicio
i,max,sumap=0,suman=0,numero; int
Print " Cuantos numeros = ";
Read max;
for(i=1;i<=max;i++)
{
Print " Numero entero : ";
Read numero;
if (numero<0)
{
suman = suman+numero;
}
else
{
if(numero>0)
{
sumap = sumap+numero;
}
}
}
Print " Suma positivos = ",sumap;
Print " Suma negativos = ",sumanl;
Fin.
1.- Inicio
vcelsius,cantidad,inc,celsius,farenheit,c=0 int
Print ”valor incial celsius= "
Read vcelsius
Print "Numero de conversiones= "
Read cantidad
Print "Incremento de temperatura celsius= "
Read inc
celsius = vcelsius
while(c<=cantidad) { farenheit=(9.0/5.0)*celsius+32; Print "celsius " " farenheit" Print ,Celsius," ",farenheit celsius = celsius+inc c = c+1 } Fin
1.- Inicio
n1,n2,n3,n4,n5 int
i=0 int
Print “valor 1 : "
Read n1
Print "valor 2 : "
Read n2
Print "valor 3 : "
Read n3
Print "valor 4 : "
Read n4
Print "valor 5 : "
Read n5
for(i=1; i<=n1; i++) { Print "*" } Print ,endl for(i=1; i<=n2; i++) { Print "*" } Print ,endl for(i=1 to i<=n3 step i++) { Print "*" } Print ,endl for(i=1 to i<=n4 step i++) { print "*" } print ,endl for(i=1 to i<=n5 step i++) { Print "*" } Print ,endl
i=0 int
Print “valor 1 : "
Read n1
Print "valor 2 : "
Read n2
Print "valor 3 : "
Read n3
Print "valor 4 : "
Read n4
Print "valor 5 : "
Read n5
for(i=1; i<=n1; i++) { Print "*" } Print ,endl for(i=1; i<=n2; i++) { Print "*" } Print ,endl for(i=1 to i<=n3 step i++) { Print "*" } Print ,endl for(i=1 to i<=n4 step i++) { print "*" } print ,endl for(i=1 to i<=n5 step i++) { Print "*" } Print ,endl
Fin.

No hay comentarios:
Publicar un comentario