В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия

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

Показать ответ
Ответ:
lex9090
lex9090
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.

0,0(0 оценок)
Ответ:
lcdnek198
lcdnek198
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;

}

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота