#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <time.h>

void main() {
    const int n = 15; 		/* число элементов массива */
    const int n1 = -15; 	/* минимальное случайное число */
    const int n2 = 30; 		/* максимальное случайное число */

    int A[15], i, imax;

    randomize();
    for (i = 0; i < n; i++) A[i] = random(n2 - n1 + 1) + n1;

    clrscr();                   /* очистка экрана */

    printf("\nA[%d] =\n", n);
    for (i = 0; i < n; i++) printf("%4d", i);
    printf("\n");

    imax=0;
    for (i = 0; i < n; i++) {
	if (A[i] > A[imax]) imax = i;
	printf("%4d", A[i]);
    }

    printf("\n Max элемент массива A[%d] = %d\n", imax, A[imax]);
}

#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <time.h>

void main() {
    const int n = 10; 		/* число элементов массива */
    const int n1 = 50; 		/* минимальное случайное число */
    const int n2 = 100;		/* максимальное случайное число */
    const float Amax = 69.87;   /* ищем произведение чисел меньше заданного */

    float A[10];
    double P;
    int i, itotal;
    time_t t;

    clrscr();                 /* очистка экрана */

    srand((unsigned) time(&t));
    for (i = 0; i < n; i++) A[i] = rand() / 32767. * (n2 - n1) + n1;

    P = 1.;
    itotal = 0;
    for (i = 0; i < n; i++) {
	if (A[i] < Amax) {
	     itotal = itotal++;
             P = P * A[i];
        }
	printf("\n A[%d] = %8.4f", i, A[i]);
    }
    if (itotal > 0) printf("\n Произведение %d элементов массива вещественных чисел,\n меньших %8.4f = %f", itotal, Amax, P);
    else printf("\n Не найдены элементы массива вещественных чисел,\n меньших %8.4f", Amax);
}