Recent Posts

Recent Posts

Pages: 1 [2] 3 4 ... 10
11
Primer Año / Re: Introduccion a la Programacion - PSeInt y los ejercicios!
« Last post by Zenyatta on May 12, 2020, 07:06:50 pm »
Simulacro 1 - A
Link de descarga

Code: PSeInt [Installed Languages]
// Mostrar por pantalla la tabla de multiplicar del 3, desde el 3 hasta el
// número N ingresado por teclado, en forma ascendente. Validar que N
// sea mayor a 0.
// Un ejemplo de pantalla de ejecución sería:
// “Serie: Tabla de multiplicar por 3”
// “Ingrese un número para terminar la serie: ”
// ? 25
// 3, 6, 9, 12, 15, 18, 21, 24

Algoritmo Simulacro_1A

Definir n, a, suma como ENTERO;

Escribir "Tabla del 3 hasta N.";
Escribir "";
Escribir "Ingrese el numero objetivo.";

n = 0;
a = 0;
suma = 0;

Mientras n <= 0 Hacer
Si a == 1 Entonces
Escribir "El numero ingresado es invalido.";
Escribir "Por favor ingrese un numero mayor a cero.";
FinSi
a = 1;
Leer n;
Escribir "";
FinMientras

Mientras suma + 3 <= n Hacer
suma = suma + 3
Escribir ", ", suma Sin Saltar;
FinMientras

FinAlgoritmo

^ Arriba ^


Simulacro 1 - B
Link de descarga

Code: PSeInt [Installed Languages]
//Mostrar por pantalla la tabla de multiplicar del 4, desde el 4 hasta el
//número N ingresado por teclado, en forma ascendente. Validar que N
//sea mayor a 0.
//Un ejemplo de pantalla de ejecución sería:
//“Serie: Tabla de multiplicar por 4”
//“Ingrese un número para terminar la serie: ”
// ? 25
// 4 ,8 ,12 ,16 ,20 ,24

Algoritmo Simulacro_1B

Definir a, n como ENTERO;

Escribir "Tabla del 4 hasta N.";
Escribir "";
Escribir "Ingrese el numero objetivo.";

a = 0;
n = 0;

Mientras n <= 0 Hacer
Si a == 1 Entonces
Escribir "El numero ingresado es invalido.";
Escribir "Por favor, ingrese un numero mayor a cero.";
FinSi

a = 1;
Leer n;

FinMientras

n = TRUNC(n/4);
Dimension suma[n+1];
a = 0;
Mientras a <= n Hacer
suma[a] = a * 4;
a = a + 1;
FinMientras

a = 0;
Mientras a <= n Hacer
Escribir a, " x 4 = " suma[a];
a = a + 1;
FinMientras

FinAlgoritmo

^ Arriba ^


Simulacro 1 - C
Link de descarga

Code: PSeInt [Installed Languages]
//Mostrar por pantalla la tabla de multiplicar del 5, desde el 5 hasta el
//número N ingresado por teclado, en forma ascendente. Validar que N
//sea mayor a 0.
//Un ejemplo de pantalla de ejecución sería:
//“Serie: Tabla de multiplicar por 4”
//“Ingrese un número para terminar la serie: ”
// ? 32
// 5, 10, 15, 20, 25, 30

Algoritmo Simulacro_1C

Definir a, n como ENTERO;

Escribir "Tabla del 5 hasta N.";
Escribir "";
Escribir "Ingrese el numero objetivo.";

n = 0;
a = 0;

Mientras n <= 0 Hacer
Si a == 1 Entonces
Escribir "El numero ingresado es invalido.";
Escribir "Por favor ingrese un numero mayor a cero.";
FinSi
a = 1;
Leer n;
Escribir "";
FinMientras

Escribir "0" SINSALTAR;

Para a = 5 hasta n Con Paso 5 Hacer
Escribir ", ",a SINSALTAR;
FinPara

FinAlgoritmo

^ Arriba ^


Simulacro 1 - D
Link de descarga

Code: PSeInt [Installed Languages]
//Mostrar por pantalla los primeros N números de una serie, siguiendo
//el ejemplo. Validar que N sea mayor a 0.
//Un ejemplo de pantalla de ejecución sería:
//“Serie: N * i - 1” (siendo i de 0 a N-1)
//“Ingrese un número generar para la serie: ”
// ? 5
// -1, 4, 9, 14, 19

Algoritmo Simulacro_1D

Definir a, b, n como ENTERO;

Escribir "Serie N.";
Escribir "";
Escribir "Ingrese el numero patron.";

n = 0;
a = 0;

Mientras n <= 0 Hacer
Si a == 1 Entonces
Escribir "El numero ingresado es invalido.";
Escribir "Por favor ingrese un numero mayor a cero.";
FinSi
a = 1;
Leer n;
Escribir "";
FinMientras

a = -1;
b = 1;

Escribir "-1" SINSALTAR;

Mientras b < n Hacer
b = b + 1;
a = a + n;
Escribir ", ", a SINSALTAR;
FinMientras

FinAlgoritmo

^ Arriba ^


Simulacro 1 - E
Link de descarga

Code: PSeInt [Installed Languages]
//Mostrar por pantalla los primeros N números de una serie, siguiendo
//el ejemplo. Validar que N sea mayor a 0.
//Un ejemplo de pantalla de ejecución sería:
//“Serie: N / i ” (siendo i de 1 a N)
//“Ingrese un número generar para la serie: ”
// ? 7
// 7, 3.5, 2.33, 1.75, 1.4, 1.16, 1

Algoritmo sin_titulo

Definir b, a como ENTERO;

Escribir "Serie N / i.";
Escribir "";

n = 0;
a = 0;

Mientras n <= 0 Hacer
Si a == 1 Entonces
Escribir "El numero ingresado es invalido.";
Escribir "Por favor ingrese un numero mayor a cero.";
FinSi
a = 1;
Leer n;
Escribir "";
FinMientras

Para a = 1 Hasta n Hacer

Escribir n, " / " a, " = " TRUNC(n/a*100)/100;

FinPara

FinAlgoritmo

^ Arriba ^
12
Primer Año / Re: Algebra I
« Last post by Zenyatta on April 22, 2020, 11:32:59 am »
Una vez que tenemos la matriz transpuesta, multiplicamos la matriz por el inverso del determinante de la matriz original (55-1 = 1/55)

21
-11
8
___
21
55
-11
55
_8_
55
-1
11
-3
x
_1_
55
-1
55
11
55
-3
55
-16
11
7
___
-16
55
11
55
_7_
55

Aca tenemos la matriz inversa a la original!

Uno puede seguir a los siguientes pasos para obtener los valores de X, Y, y Z del enunciado origianl ya que este ejercicio no es de calculo de la inversa de la matriz si no de resolucion de un sistema de ecuaciones.

Continuando:

Ponemos del lado derecho los resultados originales del enunciado del sistema de ecuaciones y procedemos a sumar el producto de cada celda de la fila con cada celda de la columna de las respuestas para obtener los valores de X, Y, y Z respectivamente


21
55
-11
55
_8_
55
|7
-1
55
11
55
-3
55
|12
-16
55
11
55
_7_
55
|5


7 *
21
55
+ 12 *
-11
55
+ 5 *
_8_
55
 = 1
7 *
-1
55
+ 12 *
11
55
+ 5 *
-3
55
 = 2
7 *
-16
55
+ 12 *
11
55
+ 5 *
_7_
55
 = 1

X = 1
Y = 2
Z = 1
13
Primer Año / Re: Algebra I
« Last post by Zenyatta on April 22, 2020, 11:24:19 am »
Ahora debemos realizar las submatrices y realizar la resta de los productos de las diagonales.
paciencia wacho que esto es alta paja

2
3
-1
___
1
5
1
-->
5
1
3
-1
4
___
-1
4

5 * 4 = 20
1 * -1 = -1
20 - (-1) = 21


2
3
-1
___
1
5
1
-->
1
1
3
-1
4
___
3
4

1 * 4 = 4
1 * 3 = 3
4 - 3 = 1


2
3
-1
___
1
5
1
-->
1
5
3
-1
4
___
3
-1

1 * -1 = -1
5 * 3 = 15
-1 - 15 = -16


2
3
-1
___
3
-1
]1
5
1
-->
3
-1
4
___
-1
4

3 * 4 = 12
-1 * -1 = 1
12 - 1 = 11


2
3
-1
___
2
-1
1
5
1
-->
3
-1
4
___
3
4

2 * 4 = 8
-1 * 3 = -3
8 - (-3) = 11


2
3
-1
___
2
3
1
5
1
-->
3
-1
4
___
3
-1

2 * -1 = -2
3 * 3 = 9
-2 - 9 = -11


2
3
-1
___
3
-1
1
5
1
-->
5
1
3
-1
4
___

3 * 1 = 3
-1 * 5 = -5
3 - (-5) = 8


2
3
-1
___
2
-1
1
5
1
-->
1
1
3
-1
4
___

2 * 1 = 2
-1 * 1 = -1
2 - (-1) = 3


2
3
-1
___
2
3
1
5
1
-->
1
5
3
-1
4
___

2 * 5 = 10
3 * 1 = 3
10 - 3 = 7


Ahora, con los determinantes de las submatrices, realizamos una matriz adjunta.
Los numeros en rojo van a ser multiplicados por -1 en el siguiente paso.

21
1
-16
11
11
-11
8
3
7


21
-1
-16
-11
11
11
8
-3
7

y ahora realizamos la matriz transpuesta, cambiando de lugar las diagonales secundarias, manteniendo la principal intacta.

21
-11
8
-1
11
-3
-16
11
7
14
Primer Año / Re: Introduccion a la Programacion - PSeInt y los ejercicios!
« Last post by Zenyatta on April 17, 2020, 07:27:28 pm »
Ejercicio 36
Link de descarga (Mientras)

Link de descarga (Repetir)
Link de descarga (Para)

Obtener el promedio de edad de N alumnos utilizando Mientras, Para, y Repetir en tres algoritmos distintos.

Code: PSeInt [Installed Languages]
///* 36 Obtener el promedio de edad de un grupo de N alumnos (realizar tres algoritmos uno con cada estructura de control Mientras, Repetir, Para) */
Algoritmo e36_0
Definir n, max como ENTERO;
Definir prom como REAL;
n = 0;
max = 0;
Escribir "Promedio de la edad de los alumnos (Mientras).";
Mientras max <= 0 Hacer
Escribir "";
Escribir "Ingrese la cantidad de alumnos que hay en el aula";
Leer max;
// /*max = ALEATORIO(15,40); //Aula entre 15 y 40 alumnos EDIT: profe dijo despues que el numero de alumnos lo ingresa el usuario */
FinMientras
Dimension array(max);
prom = 0;
Mientras n < max Hacer //rellenar los arrays
array[n] = ALEATORIO(13, 18); //edades promedio de un secundario
prom = prom + array[n];
n = n + 1;
FinMientras
prom = prom / max;

//Solo queremos hasta dos decimales
prom = prom * 100;
prom = TRUNC(prom);
prom = prom / 100;

Escribir "El promedio de edad del aula con ",max," alumnos es de ",prom;
FinAlgoritmo


^ Arriba ^


Link de descarga

Code: PSeInt [Installed Languages]
///* 36 Obtener el promedio de edad de un grupo de N alumnos (realizar tres algoritmos uno con cada estructura de control Mientras, Repetir, Para) */
Algoritmo e36_0
Definir n, max como ENTERO;
Definir prom como REAL;
n = 0;
max = 0;
Escribir "Promedio de la edad de los alumnos (Repetir).";
Mientras max <= 0 Hacer
Escribir "";
Escribir "Ingrese la cantidad de alumnos que hay en el aula";
Leer max;
// /*max = ALEATORIO(15,40); //Aula entre 15 y 40 alumnos EDIT: profe dijo despues que el numero de alumnos lo ingresa el usuario */
FinMientras
Dimension array(max);
prom = 0;

Repetir //rellenar los arrays
array[n] = ALEATORIO(13, 18); //edades promedio de un secundario
prom = prom + array[n];
n = n + 1;
Hasta Que n == max;

prom = prom / max;

//Solo queremos hasta dos decimales
prom = prom * 100;
prom = TRUNC(prom);
prom = prom / 100;

Escribir "El promedio de edad del aula con ",max," alumnos es de ",prom;
FinAlgoritmo

^ Arriba ^


Link de descarga

Code: PSeInt [Installed Languages]
///* 36 Obtener el promedio de edad de un grupo de N alumnos (realizar tres algoritmos uno con cada estructura de control Mientras, Repetir, Para) */
Algoritmo e36_0
Definir n, max como ENTERO;
Definir prom como REAL;
n = 0;
max = 0;
Escribir "Promedio de la edad de los alumnos (Para).";
Mientras max <= 0 Hacer
Escribir "";
Escribir "Ingrese la cantidad de alumnos que hay en el aula";
Leer max;
// /*max = ALEATORIO(15,40); //Aula entre 15 y 40 alumnos EDIT: profe dijo despues que el numero de alumnos lo ingresa el usuario */
FinMientras
Dimension array(max);
prom = 0;

Para n = 0 Hasta max-1 Hacer //rellenar los arrays
array[n] = ALEATORIO(13, 18); //edades promedio de un secundario
prom = prom + array[n];
FinPara

prom = prom / max;

//Solo queremos hasta dos decimales
prom = prom * 100;
prom = TRUNC(prom);
prom = prom / 100;

Escribir "El promedio de edad del aula con ",max," alumnos es de ",prom;
FinAlgoritmo

^ Arriba ^



Ejercicio 37
Link de descarga (Mientras)
Link de descarga (Repetir)
Link de descarga (Para)

Obtener el promedio de edad de N alumnos utilizando Mientras, Para, y Repetir en tres algoritmos distintos.
N será ingresado por el usuario y debe ser mayor a 0. Las N edades serán ingresadas por el usuario, deben ser mayor a 16.

Code: PSeInt [Installed Languages]
///* 37 Obtener el promedio de edad de un grupo de N alumnos (realizar tres algoritmos uno con cada estructura de control Mientras, Repetir, Para) */
Algoritmo e37_0
Definir n, i como ENTERO;
Definir prom como REAL;
n = 0;
i = 0;
Escribir "Promedio de la edad de los alumnos (Mientras).";
Mientras n <= 0 Hacer
Si i > 0 Entonces
Escribir "La cantidad de alumnos debe ser mayor a cero.";
FinSi
Escribir "";
Escribir "Ingrese la cantidad de alumnos que hay en el aula";
Leer n;
i = 1;
FinMientras
Dimension array(n);
prom = 0;
i = 0;
Mientras i < n Hacer //rellenar los arrays
Escribir "";
Escribir "Ingrese la edad del alumno ",i+1;
Leer array[i];
Si array[i] > 16 Entonces
prom = prom + array[i];
i = i + 1;
SiNo Escribir "La edad debe ser mayor a 16.";
FinSi

FinMientras
prom = prom / n;

prom = prom * 100;
prom = TRUNC(prom);
prom = prom / 100;

Escribir "El promedio de edad del aula con ",n," alumnos es de ",prom;
FinAlgoritmo


Link de descarga (Para)

Code: PSeInt [Installed Languages]
///* 36 Obtener el promedio de edad de un grupo de N alumnos (realizar tres algoritmos uno con cada estructura de control Mientras, Repetir, Para) */
Algoritmo e37_2
Definir n, i, a como ENTERO;
Definir prom como REAL;
n = 0;
Escribir "Promedio de la edad de los alumnos (Para).";
Para i=0 Hasta 1 Con Paso 0 Hacer

Escribir "";
Escribir "Ingrese la cantidad de alumnos que hay en el aula";
Leer n;
Si n > 0 Entonces
i = 2;
SiNo
Escribir "La cantidad de alumnos debe ser mayor a cero.";
FinSi
FinPara
prom = 0;

Para i = 0 Hasta n-1 Hacer //rellenar los arrays
Escribir "";
Escribir "Ingrese la edad del alumno ",i+1;
Leer a;
Si a > 16 Entonces
prom = prom + a;
SiNo Escribir "La edad debe ser mayor a 16.";
i = i - 1;
FinSi
FinPara

prom = prom / n;

//Solo queremos hasta dos decimales
prom = prom * 100;
prom = TRUNC(prom);
prom = prom / 100;

Escribir "El promedio de edad del aula con ",n," alumnos es de ",prom;
FinAlgoritmo


Link de descarga (Repetir)

Code: PSeInt [Installed Languages]
///* 37 Obtener el promedio de edad de un grupo de N alumnos (realizar tres algoritmos uno con cada estructura de control Mientras, Repetir, Para) */
Algoritmo e37_1
Definir n, i como ENTERO;
Definir prom como REAL;
n = 0;
i = 0;
Escribir "Promedio de la edad de los alumnos (Repetir).";
Repetir
Si i > 0 && n <= 0 Entonces
Escribir "La cantidad de alumnos debe ser mayor a cero.";
FinSi
Si n >= 100 Entonces
Escribir "La cantidad de alumnos debe ser menor a cien.";
FinSi
Escribir "";
Escribir "Ingrese la cantidad de alumnos que hay en el aula";
Leer n;
i = 1;
Hasta Que n > 0 && n < 100;
Dimension array(100);
prom = 0;
i = 0;
Repetir //rellenar los arrays
Escribir "";
Escribir "Ingrese la edad del alumno ",i+1;
Leer array[i];
Si array[i] > 16 Entonces
prom = prom + array[i];
i = i + 1;
SiNo Escribir "La edad debe ser mayor a 16.";
FinSi
Hasta Que i == n;

prom = prom / n;

//Solo queremos hasta dos decimales
prom = prom * 100;
prom = TRUNC(prom);
prom = prom / 100;

Escribir "El promedio de edad del aula con ",n," alumnos es de ",prom;
FinAlgoritmo

^ Arriba ^


Ejercicio 38
Link de descarga

Promedio de cinco numeros.

Code: PSeInt [Installed Languages]
Algoritmo sin_titulo
Definir promedio, max, n como REAL;
max = 5;
promedio = 0;
Dimension numerosIngresados(max);
Borrar Pantalla;
Escribir "Promedio de cinco numeros";
Escribir "Por favor, ingrese cinco numeros para calcular el promedio.";
n = 0;
Mientras n < max Hacer
Escribir "";
Escribir "Por favor, ingrese ",max-n," numeros.";
Leer numerosIngresados[n];
Si numerosIngresados[n] > 0 Entonces
promedio = promedio + numerosIngresados[n];
n = n+1;
SiNo Escribir "El numero ingresado debe ser mayor a cero.";
FinSi

FinMientras
promedio = promedio/5;
promedio = promedio * 100;
promedio = TRUNC(promedio);
promedio = promedio / 100;
n = 0;
Escribir "(" SINSALTAR;
Mientras n < max Hacer
Escribir numerosIngresados[n] SINSALTAR;
Si n < max-1 Entonces
Escribir " + " SINSALTAR
FinSi
n = n + 1;
FinMientras
Escribir ") / ",max," = ",promedio;
Escribir "El promedio es : ",promedio;
FinAlgoritmo

^ Arriba ^


Ejercicio 39
Link de descarga

Cuantificar pares, impares, y ceros.

Code: PSeInt [Installed Languages]
Algoritmo ej39
Escribir "Ingreso de veinte numeros cuantificar los numeros pares e impares.";
Definir max, pares, impares, ceros, n como REAL;
max = 20;
pares = 0;
impares = 0;
Dimension numerosIngresados[max];
n=0;
Escribir "";
Para n=0 Hasta max-1 Hacer
Si n == 0 entonces
Escribir "Por favor, ingrese un numero.";
sino Escribir "Por favor, ingrese otro numero. Aun faltan ", max - n, " numeros.";
FinSi

Leer numerosIngresados[n];
si numerosIngresados[n] > 0 entonces
si numerosIngresados[n] % 2 == 0 entonces
pares = pares + 1;
SiNo
impares = impares + 1;
FinSi
SiNo
Escribir "";
Escribir "El numero ingresado debe ser mayor a cero.";
n = n - 1;
FinSi
Escribir "";
FinPara

si pares > 0 entonces
Escribir "Hay ", pares, " numeros pares.";
n = 0;
Mientras n < max Hacer
Si numerosIngresados[n] % 2 == 0 Entonces
Escribir numerosIngresados[n] SINSALTAR;
Si n < pares Entonces
Escribir ", " SINSALTAR
FinSi
FinSi
n = n + 1;
FinMientras
sino Escribir "No hay numeros pares.";
FinSi

si impares > 0 entonces
Escribir "";
Escribir "Hay ", impares, " numeros impares.";
n = 0;
Mientras n < max Hacer
Si numerosIngresados[n] % 2 != 0 Entonces
Escribir numerosIngresados[n] SINSALTAR;
Si n < impares Entonces
Escribir ", " SINSALTAR
FinSi
FinSi
n = n + 1;
FinMientras
sino Escribir "No hay numeros impares.";
FinSi
FinAlgoritmo

^ Arriba ^


Ejercicio 40
Link de descarga

MBs a GBs utilizando un Repetir, sin usar TRUNC();

Code: PSeInt [Installed Languages]
///* 40 Convertir un número (dado en MB) a su correspondiente GB con Repetir, sin TRUNC(). */

Algoritmo e_23_1
Definir a, b, c como ENTERO;
Escribir "Megabytes a Gigabytes.";
Escribir "";
Escribir "Ingrese una cantidad de megabytes para convertir a gigabytes.";
Leer a;

c = a;

Repetir
Si  a - 1024 >= 0 Entonces
a = a - 1024;
b = b + 1;
FinSi
Hasta Que a - 1024 < 0

Si a != 0 entonces
Escribir c, " MBs son ", b," GBs con ",a," MBs.";
SiNo Escribir c, " MBs son ", b," GBs.";
FinSi
FinAlgoritmo

^ Arriba ^

15
Primer Año / Re: Introduccion a la Programacion - PSeInt y los ejercicios!
« Last post by Zenyatta on April 17, 2020, 02:16:19 pm »
Ejercicio 31
Link de descarga

Factorial de N

Code: PSeInt [Installed Languages]
//31 Factorial de N. Calcular el producto de los N primeros números naturales.

Algoritmo e31
Escribir "Factorial de N";
Definir a, b, c como ENTERO;
a = -1;
Mientras a < 0 Hacer
Escribir "";
Escribir "Ingrese un numero natural para calcular el factorial " SINSARLTAR
Leer a;
FinMientras
b = a;
c = a;
Mientras a > 1 Hacer
c = c * (a-1);
a = a - 1;
FinMientras
Escribir b,"! es igual a ",c;
FinAlgoritmo


^ Arriba ^


Ejercicio 32
Link de descarga

Mostrar N numeros de la serie de Fibonacci

Code: PSeInt [Installed Languages]
//Serie Fibonacci

Algoritmo e32
Definir a, c, d, e, f como ENTERO;
Definir b como CARACTER;
Escribir "Numero de Fibonacci";
a = -1;
Mientras a < 0 Hacer
Escribir "";
Escribir "Ingrese la cantidad de digitos de Fibonacci que desea calcular " SINSARLTAR
Leer a;
FinMientras
b = "0";
f = a;
Dimension array(3);
c = 0;
d = 1;
Mientras a > 1 Hacer
e = c + d;
c = d;
d = e;
b = CONCATENAR(b,CONCATENAR(", ",CONVERTIRATEXTO(c)));
a = a - 1;
FinMientras
Escribir "";
Escribir "Los primeros ", f, " numeros de Fibonacci son: ",b;
FinAlgoritmo


^ Arriba ^


Ejercicio 33
Link de descarga

Calcular la suma de los primeros N numeros pares

Code: PSeInt [Installed Languages]
//Calcular la suma de los primeros N números pares.
//N debe ser mayor a cero y será ingresado por teclado
Algoritmo e33
Definir a, c, n como ENTERO;
Definir b como CARACTER;
Escribir "Suma de N numeros pares";
a = -1;
Mientras a < 1 Hacer
Escribir "";
Escribir "Ingrese la cantidad de numeros pares que desea sumar " SINSARLTAR
Leer a;
FinMientras
b = "2";
n = 2;
c = 2;
Mientras n < a*2 Hacer
n = n + 2;
b = CONCATENAR(b,CONCATENAR(" + ",CONVERTIRATEXTO(n)));
c = c + n;
FinMientras
Escribir "";
Escribir b," es igual a ",c;
FinAlgoritmo


^ Arriba ^


Ejercicio 34
Link de descarga

Promedio, maximo, y minimo de lluvia en un mes.

Code: PSeInt [Installed Languages]
//Se ingresa por teclado la cantidad de agua caída en mm día a día durante un SOLO mes.
//Se pide el día de mayor lluvia, el de menor lluvia y el promedio de mm llovidos.
///*Si un día no llueve se ingresa 0. Todos los meses tendrán 30 días. */

Algoritmo e34
Dimension array(30);
Definir max, min, prom como REAL;
Definir max1, max2, n como ENTERO;
Definir mes como CARACTER;
Escribir "Max, min, y promedio de lluvia de un mes";
Escribir "";
max = 0;
max1 = 0;
Escribir "Ingrese el nombre del mes " SINSALTAR;
Leer mes;
min = -1;
min1 = 0;
prom = 0;
Mientras n < 30 Hacer
Escribir "Por favor, ingrese la cantidad de lluvia que cayo el dia ",n+1, " en milimetros.";
Leer array(n);
Si array(n) >= 0 Entonces
Si array(n) > max Entonces
max = array(n);
max1 = n;
FinSi
Si array(n) < min || min == -1 Entonces
min = array(n);
min1 = n;
FinSi
prom = prom + array(n);
n = n + 1;
Escribir "";
SiNo
Escribir "";
Escribir "El numero ingresado debe ser mayor o igual a cero.";
FinSi
FinMientras
prom = prom / 30;
Escribir "";
Escribir "En el mes de ", mes, ", cayo un promedio de ",prom,"mm de agua.";
Escribir "El maximo de caida fue de ", max, "mm en el dia ", max1;
Escribir "El minimo de caida fue de ", min, "mm en el dia ", min1;
FinAlgoritmo


^ Arriba ^


Ejercicio 35
Link de descarga

Ahorro anual

Code: PSeInt [Installed Languages]
///* Se requiere saber cuánto ahorró una persona en un año, si al final de cada mes deposita lo que pudo ahorrar.
//Mostrar también lo que se va ahorrando mes a mes. Si no ahorró nada, ingresará 0.*/

Algoritmo e35
Dimension array(12), mes(12);
Definir max, min, tot como REAL;
Definir max1, max2, n como ENTERO;
Escribir "Ahorro Anual";
Escribir "";

mes[0] = "Enero";
mes[1] = "Ferbero";
mes[2] = "Marzo";
mes[3] = "Abril";
mes[4] = "Mayo";
mes[5] = "Junio";
mes[6] = "Julio";
mes[7] = "Agosto";
mes[8] = "Septiembre";
mes[9] = "Octubre";
mes[10] = "Noviembre";
mes[11] = "Diciembre";

max = 0;
max1 = 0;
min = -1;
min1 = 0;
prom = 0;
Mientras n < 12 Hacer
Escribir "Por favor, ingrese cuanto ahorro en el mes de ",mes(n);
Leer array(n);
Si array(n) >= 0 Entonces
Si array(n) > max Entonces
max = array(n);
max1 = n;
FinSi
Si array(n) < min || min == -1 Entonces
min = array(n);
min1 = n;
FinSi
tot = tot + array(n);
n = n + 1;
Escribir "";
SiNo
Escribir "";
Escribir "El numero ingresado debe ser mayor o igual a cero.";
Escribir "En el caso que haya perdido plata en el mes, no cuenta como ahorro negativo.";
FinSi
FinMientras
Escribir "";

n = 0;
Mientras n < 12 Hacer
Escribir "En el mes de ",mes[n]," se ahorro $", array(n), ".";
n = n + 1;
FinMientras
Escribir "";
Escribir "En el año, se ahorro un total de $",tot,".";
Escribir "El maximo ahorro fue de $", max, " en el mes de ", mes[max1];
Escribir "El minimo ahorro fue de $", min, " en el mes de ", mes[min1];
FinAlgoritmo

^ Arriba ^
16
Primer Año / Re: Introduccion a la Programacion - PSeInt y los ejercicios!
« Last post by Zenyatta on April 17, 2020, 10:39:55 am »
Ejercicio 26
Link de descarga

Para llenar: Recorrer todo un arreglo de 15 elementos numéricos reales y completar sus elementos con un nro. al azar

Code: PSeInt [Installed Languages]
//26 Para llenar: Recorrer todo un arreglo de 15 elementos numéricos reales y completar sus elementos con un nro. al azar

Algoritmo sin_titulo
Dimension array(15);
Definir n como ENTERO;
n = 0;

Escribir "Mostrar todos los valores de los indices de un array";

Mientras n < 15 Hacer
array(n) = AZAR(128);
n = n + 1;
FinMientras

n = 0;

Mientras n < 15 Hacer
Escribir "Indice [",n,"] = ",array(n);
n = n + 1;
FinMientras
FinAlgoritmo

^ Arriba ^


Ejercicio 27
Link de descarga

Para leer: Recorrer todo un arreglo de 15 elementos numéricos reales y completar sus elementos con un nro. ingresado por teclado

Code: PSeInt [Installed Languages]
//27 Para leer: Recorrer todo un arreglo de 15 elementos numéricos reales y completar sus elementos con un nro. ingresado por teclado

Algoritmo e27
Escribir "Insertar numeros en un array de 15 indices.";
Dimension array(15);
Definir n como ENTERO;
n = 0;
Mientras n < 15 Hacer
Leer array(n);
n = n + 1;
FinMientras
FinAlgoritmo

^ Arriba ^


Ejercicio 28
Link de descarga

Ingresar por teclado 10 elementos enteros, colocarlos en un vector y luego mostrar su contenido separado por comas.

Code: PSeInt [Installed Languages]
//28 Ingresar por teclado 10 elementos enteros, colocarlos en un vector y luego mostrar su contenido separado por comas.

Algoritmo e28
Escribir "Insertar numeros en un array de 10 indices.";
Dimension array(10);
Definir n como ENTERO;
n = 0;
Mientras n < 10 Hacer
Leer array(n);
n = n + 1;
FinMientras
Escribir "";
Escribir "Valores del array:";
n = 0;
Mientras n < 10 Hacer
Escribir array(n),", " SINSALTAR;
n = n + 1;
FinMientras
Escribir "";
FinAlgoritmo

^ Arriba ^


Ejercicio 29
Link de descarga

Calcular el promedio de 5 números ingresados por teclado. Utilizar un vector. Primero leer los cinco números, luego recorrerlo para calcular el promedio

Code: PSeInt [Installed Languages]
//29 Calcular el promedio de 5 números ingresados por teclado.
//Utilizar un vector. Primero leer los cinco números, luego recorrerlo para calcular el promedio

Algoritmo sin_titulo
Escribir "Promedio de cinco numeros con array.";
Dimension array(5);
Definir n como ENTERO;
Definir p como REAL;
n = 0;
p = 0;

Mientras n < 5 Hacer
Leer array(n);
n = n + 1;
FinMientras

Escribir "";
Escribir "Calculo del promedio:";

n = 0;
Mientras n < 5 Hacer
p = p + array(n);
n = n + 1;
FinMientras
p = p / 5;
Escribir "";
Escribir "Resultado del promedio: ", p;
FinAlgoritmo

^ Arriba ^


Ejercicio 30
Link de descarga

Comparar 2 vectores con 10 elementos enteros ya ordenados en forma ascendente y generar un tercer vector también ordenado.
(para probarlo en Pseint ver indicación en presentación clase 5)

Code: PSeInt [Installed Languages]
// 30 Comparar 2 vectores con 10 elementos enteros ya ordenados en forma ascendente y generar un tercer vector también ordenado.
///*  (para probarlo en Pseint ver indicación en presentación clase 5) */

Algoritmo sin_titulo
Definir n, max, tmp como ENTERO;
max = 10;
Dimension array1(max), array2(max), arrayMezclado(max*2);


n = 0;
Mientras n < max Hacer // rellenar los arrays
array1[n] = ALEATORIO(max*n, max*(n+1));
array2[n] = ALEATORIO(max*n, max*(n+1));
n = n + 1;
FinMientras

n = 0;
Mientras n < max Hacer // rellenar los arrays
Escribir array1[n]," " SINSALTAR;
n = n + 1;
FinMientras
Escribir "";
n = 0;
Mientras n < max Hacer // rellenar los arrays
Escribir array2[n]," " SINSALTAR;
n = n + 1;
FinMientras

n=0;
Mientras n < max*2 Hacer //rellenar el tercer array
Si n < max Entonces
arrayMezclado[n] = array1[n];
Sino
arrayMezclado[n] = array2[n-max];
FinSi
n = n + 1;
FinMientras
Escribir "";

n = 0;
Mientras n < max*2-1 Hacer //aca arrancamos la recursion para ordenar de menor a mayor
Si arrayMezclado[n] > arrayMezclado[n+1] Entonces ///* Si el valor anterior es mayor al posterior */
tmp = arrayMezclado[n]; // Guardamos un toque aca el valor mas grande
arrayMezclado[n] = arrayMezclado[n+1]; // Ponemos el mas chico en el anterior
arrayMezclado[n+1] = tmp; // Ponemos el mas grande en el posterior
n = -1; // Hay que hacer todo de vuelta para asegurarnos de que no haya otro mas grande
// Poniendo 0 se saltara el primer indice ya que se suma 1 en la siguiente instruccion
FinSi
n = n + 1;
FinMientras

n = 0;
Mientras n < max*2 Hacer //mostrar el array
Escribir "Indice [",n,"] = ",arrayMezclado[n];
n = n + 1;
FinMientras

FinAlgoritmo


^ Arriba ^
17
Basurero / tacho de basura
« Last post by Zenyatta on April 13, 2020, 10:42:48 pm »
saquemos la basura
18
Primer Año / Programacion en C
« Last post by Zenyatta on April 13, 2020, 10:35:05 pm »

Dado que todavia no arranco el cuatri y estuve aburrido, me puse a pasar los ejercicios que nos habian dado para el PSeInt al C. Aca van a encontrar esos codigos, explicaciones, y el compilado binario para win64.

//falta rellenar aca, despues lo hago


Ejercicio 3 - Codigo - Compilado x64 - Promedio de cinco valores
Ejercicio 4 - Codigo - Compilado x64 - Suma de dos numeros
Ejercicio 5 - Codigo - Compilado x64 - Numero mas grande del set
Ejercicio 6 - Codigo - Compilado x64 - Adivinar un numero
Ejercicio 7 - Codigo - Compilado x64 - Promedio de N cantidad de numeros
Ejercicio 8 - Codigo - Compilado x64 - Sumatoria con loop
Ejercicio 9 - Codigo - Compilado x64 - Calculo de un cuadrado

Ejercicio 10 - Codigo - Compilado x64 - Mayores, menores, e iguales a cero
Ejercicio 11 - Codigo - Compilado x64 - Mayor a cien
Ejercicio 12 - Codigo - Compilado x64 - Mayor o menor a cien
Ejercicio 13 - Codigo - Compilado x64 - Sumatoria con loop
Ejercicio 14 - Codigo - Compilado x64 - Mayores, menores, e iguales a cero con un for loop
Ejercicio 15 - Codigo - Compilado x64 - Suma consecutiva de numeros
Ejercicio 16 - Codigo - Compilado x64 - Area de un triangulo
Ejercicio 17 - Codigo - Compilado x64 - Pares e impares
Ejercicio 18 - Codigo - Compilado x64 - Salarios
Ejercicio 19 - Codigo - Compilado x64 - Multiplicacion

Ejercicio 20 - Codigo - Compilado x64 - Division
Ejercicio 21 - Codigo - Compilado x64 - Par o impar
Ejercicio 22 - Codigo - Compilado x64 - Segundos a minutos y segundos
Ejercicio 23 - Codigo - Compilado x64 - Megabytes a Gigabytes
Ejercicio 24 - Codigo - Compilado x64 - Inicializacion de arrays
Ejercicio 25 - Codigo - Compilado x64 - Mostrar un array
Ejercicio 26 - Codigo - Compilado x64 - Rellenar un array con numeros al azar
Ejercicio 27 - Codigo - Compilado x64 - Rellenar un array con numeros ingresados
Ejercicio 28 - Codigo - Compilado x64 - Rellenar y mostrar un array
Ejercicio 29 - Codigo - Compilado x64 - Promedio de cinco numeros utilizando un array

Ejercicio 30 - Codigo - Compilado x64 - Juntar dos arrays y ordenar de mayor a menor
Ejercicio 31 - Codigo - Compilado x64 - Factorial de N
Ejercicio 32 - Codigo - Compilado x64 - Fibonacci
Ejercicio 33 - Codigo - Compilado x64 - Suma de N numeros pares
Ejercicio 34 - Codigo - Compilado x64 - Promedio, Max, y Min de lluvia de un mes
Ejercicio 35 - Codigo - Compilado x64 - Cuantificar cuanto ahorro una persona
Ejercicio 36 - Codigo - Compilado x64 - Promedio de edad de un grupo de alumnos
19
Primer Año / Algebra I
« Last post by Zenyatta on April 13, 2020, 04:38:03 pm »
Analisis Matematico I
ALGEBRA


Trabajos Practicos



COMO MIERDA CALCULAR LA INVERSA DE UNA MATRIZ

Supongamos que tenemos el siguiente sistema de ecuaciones:

2x + y - z = 2
x - 3y + 3z = 1
3x + y - z = 3


Pasamos a una matriz de 3x3 las constantes que multiplican a las variables

2
1
-1
1
-3
3
3
1
-1


Calculamos el determinante

Para calcular el determinante, las primeras dos filas se duplican al final de la tabla, se multiplican las diagonales principales, y se le resta el producto de las diagonales secundarias.

2
1
-1
1
-3
3
3
1
-1
2
1
-1
1
-3
3

Entonces tenemos:
Principales
|
Secundarias
2 * -3 * -1 = 6
|
-1 * -3 * 3 = 9
1 * 1 * -1 = -1
|
3 * 1 * 2 = 6
3 * 1 * 3 = 9
|
-1 * 1 * 1 = -1

6 + (-1) + 9 = 14 (Principal)
9 + 6 + (-1) = 14 (Secundaria)
-14 - (-14) = 0

No hay determinante, no se puede hacer la inversa ya que 0-1 es 1/0. La division por cero no se puede hacer en los numeros reales.


OTRO EJEMPLO

Supongamos que tenemos el siguiente sistema de ecuaciones:

2x + 3y - z = 7
x + 5y + z = 12
3x - y + 4z = 5


Pasamos a una matriz de 3x3 las constantes que multiplican a las variables

2
3
-1
1
5
1
3
-1
4


Calculamos el determinante

Para calcular el determinante, las primeras dos filas se duplican al final de la tabla, se multiplican las diagonales principales, y se le resta el producto de las diagonales secundarias.

2
3
-1
1
5
1
3
-1
4
2
3
-1
1
5
1

Entonces tenemos:
Principales
|
Secundarias
2 * 5 * 4 = 40
|
-1 * 5 * 3 = -15
1 * -1 * -1 = 1
|
1 * -1 * 2 = -2
3 * 3 * 1 = 9
|
4 * 3 * 1 = 12

40 + 1 + 9 = 50
-15 + -2 + 12 = -5
50 - (-5) = 55

El determinante es 55!
20
Primer Año / Metodologia de la Investigacion
« Last post by Zenyatta on April 13, 2020, 04:37:34 pm »
Metodologia de la Investigacion


Pages: 1 [2] 3 4 ... 10

PILAR EL TIEMPO