Lenguaje VB
Enviado por Kenny Jhon Leo Vasquez Briones • 21 de Mayo de 2021 • Práctica o problema • 3.025 Palabras (13 Páginas) • 86 Visitas
1 int cn, i;
double m, s = 0;
System.Console.WriteLine("Cálculo de la media armónica");
System.Console.WriteLine("");
System.Console.WriteLine("Ingrese la cantidad de numeros a operar");
cn = Convert.ToInt32(Console.ReadLine());
double[] v = new double[100];
for (i = 1; i < cn; i++)
{
System.Console.WriteLine("numero[" + i + "]");
v[i] = Convert.ToDouble(Console.ReadLine());
s = s + (1 / v[i]);
}
m = cn / s;
System.Console.WriteLine("la media armonica de los numeros es:" +m);
Console.Read();
2
int i, j = 0, n, m;
double[] v = new double[100];
System.Console.WriteLine("conteo de numeros repetidos");
System.Console.WriteLine("");
System.Console.WriteLine("ingrese cantidad de repeticiones");
n = Convert.ToInt32(Console.ReadLine());
for (i = 0; i < n; i++)
{
System.Console.WriteLine("N°[" + (i + 1) + "]");
v[i] = Convert.ToDouble(Console.ReadLine());
}
System.Console.WriteLine("ingrese el numero que desea ver cuantas veces se repite");
m = Convert.ToInt32(Console.ReadLine());
for (i = 0; i < n; i++)
{
if (v[i] == m)
j = j + 1;
}
System.Console.WriteLine("cantidad de veces que se repite"+m+"="+j);
Console.Read();
3
int i, j, x=0, y,n1,n2;
int[] v1 = new int[100];
int[] v2 = new int[100];
System.Console.WriteLine("elementos de un conjunto que no se repitan en otro");
System.Console.WriteLine("");
System.Console.WriteLine("ingrese numero de elementos del conjunto A");
n1 = Convert.ToInt32(Console.ReadLine());
for (i = 0; i < n1; i++)
{
System.Console.WriteLine("N°[" +( i + 1) + "]");
v1[i] = Convert.ToInt32(Console.ReadLine());
}
System.Console.WriteLine("ingrese numero de elementos del conjunto B");
n2 = Convert.ToInt32(Console.ReadLine());
for (i = 0; i < n2; i++)
{
System.Console.WriteLine("N°[" +( i + 1) + "]");
v2[i] = Convert.ToInt32(Console.ReadLine());
}
for (i = 0; i < n1; i++)
{
for (j = 0; j < n2; j++)
{
if (v1[i] != v2[j])
x = v1[i];
}
System.Console.WriteLine(x + ":no se repite en el conjunto B ");
}
Console.Read();
9
int f, c, i, j,m,n;
int[,] matriz = new int[50, 50];
System.Console.WriteLine("mayor y menor elemento de una matriz");
System.Console.WriteLine("");
System.Console.WriteLine("ingrese el numero de filas de la matriz");
f=Convert.ToInt32(Console.ReadLine());
...