Напишите на любом известном вам языке программирования программу, которая находит минимальное значение в массиве из n (n < = 100) натуральных чисел. программа должна считывать сначала количество элементов массива, а затем сам массив и выводить одно число — минимальный элемент массива.

inkognit1234567 inkognit1234567    3   27.09.2019 00:20    1

Ответы
sapeglub sapeglub  08.10.2020 21:28

Program Minimum;

Var i, n, Min : integer ;

a : array [1..100] of integer;

Begin

Writeln('Введите количество элементов массива') ;

Readln(n) ;

For i := 1 to n do

begin

read(a[i]);

end;

Min := a[1];

for i := 2 to n do

if a[i]<Min then Min := a[i];

writeln('Минимальный элемент массива = ', Min) ;

end.

ПОКАЗАТЬ ОТВЕТЫ
zhgulevatanya zhgulevatanya  08.10.2020 21:28

Так как изначально в задании указано : "на любом известном вам языке программирования" - вот, держи на С.

#include <stdio.h>

#include <stdlib.h>

#include <locale.h>

#define N 100

int main()

{

setlocale(LC_ALL, "Rus");

int i, M;

float B[N], MIN;

printf(" Введите количество элементов массива (не больше 100) => ");

scanf("%d", &M);

if (M < 100)

{

for (i = 0; i < M; i++)

{

printf("Введите [%d] элемент массива =>", i);

scanf("%f", &B[i]);

}

for (i = 0; i < M; i++)

printf("%1.0f ", B[i]);

MIN=B[0];

for (int i=1; i<M; i++)

{

if (B[i]<MIN)

MIN=B[i];

}

printf ("\n\tМинимальное значение в массиве => %7.2f", MIN);

}

else

printf("Ошибка. Заданное число элементов массива слишком большое.");

return 0;

}

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика