16/11/2022 ; 6:30 PM

5. Arreglos unidimensionales/Programas/Programa 5.6/Programa 5.6.c

@@ -0,0 +1,43 @@
+#include <stdio.h>
+#include <math.h>
+
+/* Suma-cuadrados.
+El programa calcula la suma del cuadrado de los elementos de un arreglounidimensional de 100 elementos de tipo real. */
+
+#define MAX  100
+/* MAX se utiliza para reservar el espacio máximo que podrá ocupar el arreglo. */
+
+void Lectura(float*, int); /* Prototipos de funciones. */
+double Suma(float*, int);
+
+void main(void)
+{
+	float VEC[MAX];
+	double RES;
+	Lectura(VEC, MAX);
+	RES = Suma(VEC, MAX);
+	/* Se llama a la función Suma y se almacena el resultado en la variable RES. */
+	
+	printf("\n\nSuma del arreglo: %.2lf", RES);
+}
+void Lectura(float A[], int T)
+/* La función Lectura se utiliza para leer un arreglo unidimensional de T
+➥elementos de tipo real. */
+{
+	int I;
+	for (I = 0; I < T; I++)
+	{
+		printf("Ingrese el elemento %d: ", I + 1);
+		scanf("%f", &A[I]);
+	}
+}
+double Suma(float A[], int T)
+/* La función Suma se utiliza para calcular la suma del cuadrado de los
+➥componentes de un arreglo unidimensional de T elementos de tipo real. */
+{
+	int I;
+	double AUX = 0.0;
+	for (I = 0; I < T; I++)
+		AUX += pow(A[I], 2);
+	return(AUX);
+}