Задать вопрос
14 июля, 14:44

Ввести c клавиатуры массив из 5 элементов, найти минимальный из них.

Пример:

Введите пять чисел:

4 15 3 10 14

минимальный элемент 3

+4
Ответы (1)
  1. 14 июля, 15:55
    0
    Uses crt;

    var a:array[1 ... 5] of integer; i, min:integer;

    begin

    writeln ('Введите пять чисел:') ;

    for i:=1 to 5 do

    read (a[i]) ;

    min:=a[1];

    for i:=1 to 5 do

    if a[i]
    writeln;

    write ('минимальный элемент ', min) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Ввести c клавиатуры массив из 5 элементов, найти минимальный из них. Пример: Введите пять чисел: 4 15 3 10 14 минимальный элемент 3 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1) ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива 2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент
Ответы (1)
Помогите решить задачи на паскаль. 1) Дан массив случайных чисел (количество элементов вводите с клавиатуры). Найти произведение всех элементов массива. 2) Дан массив случайных чисел (количество элементов вводите с клавиатуры).
Ответы (1)
Дан одновременный массив, состоящий из 10 эллементов. Пользователь вводит элементы массива. Ввести массив на экран в строку. Найти минимальный элемент массива.
Ответы (1)
1. Массив и 4 целых чисел вводится с клавиатуры. Найти и вывести произведение элементов массива. 2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива. 3.
Ответы (1)
1) Ввести одномерный массив А из 12 элементов. Определите в нём среднее геометрическое квадратов нечетных чисел. 2) Ввести одномерный массив А из N элементов. Каждый элемент, чей модуль больше 10, обнулить. Массив вывести до и после преобразования.
Ответы (1)