#include <stdio.h>

/* Ordenación por selección directa. */

#define MAX 100

void Lectura(int*, int);
void Ordena(int*, int); /* Prototipos de funciones. */
void Imprime(int*, int);

void main(void)
{
	int TAM, VEC[MAX];
	do
	{
		printf("Ingrese el tamaño del arreglo: ");
		scanf("%d", &TAM);
	} while (TAM > MAX || TAM < 1); /* Se verifica que el tamaño del arreglo sea
	➥correcto. */

	Lectura(VEC, TAM);
	Ordena(VEC, TAM);
	Imprime(VEC, TAM);
}

void Lectura(int A[], int T)
/* La función Lectura se utiliza para leer un arreglo unidimensional de T
➥elementos de tipo entero. */
{
	int I;
	for (I = 0; I < T; I++)
	{
		printf("Ingrese el elemento %d: ", I + 1);
		scanf("%d", &A[I]);
	}
}

void Imprime(int A[], int T)
/* Esta función se utiliza para escribir un arreglo unidimensional
➥ordenado de T elementos de tipo entero. */
{
	int I;
	for (I = 0; I < T; I++)
		printf("\nA[%d]: %d", I, A[I]);
}

void Ordena(int A[], int T)
/* La función Ordena utiliza el método de selección directa para ordenar
➥los elementos del arreglo unidimensional A. */
{
	int I, J, MEN, L;
	for (I = 0; I < (T - 1); I++)
	{
		MEN = A[I];
		L = I;
		for (J = (I + 1); J < T; J++)
			if (A[J] < MEN)
			{
				MEN = A[J];
				L = J;
			}
		A[L] = A[I];
		A[I] = MEN;
	}
}