Задать вопрос
5 октября, 11:53

Дан массив U1, ..., U15. В массиве есть два одинаковых Umin. Определить их номера.

+4
Ответы (1)
  1. 5 октября, 13:00
    0
    Var U: array [1 ... 15] of integer;

    i, min : integer;

    begin

    for i : = 1 to 15 do

    read (U[i]) ;

    min : = U[1];

    for i : = 1 to 15 do

    if (U[i] < min) then begin

    min : = U[i];

    end;

    for i : = 1 to 15 do

    if (U[i] = min) then write (i,' ') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дан массив U1, ..., U15. В массиве есть два одинаковых Umin. Определить их номера. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1) Дан массив из n элементов. Найти номер наименьшего элемента массива. 2) Дан массив из n элементов. Упорядочить массив по возрастанию. 3) Дан массив из n элементов. Упорядочить массив по убыванию.
Ответы (1)
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
1. Дан массив х (n). Переписать в массив y (n) элементы массива х, большие 3. Затем упорядочить методом "пузырька" по возрастанию новый массив. Выдать на экран номера одинаковых элементов в упорядоченном массиве.
Ответы (1)
Язык Паскаль. №1 Дан массив, состоящий из n натуральных чисел. Образовать новый массив, элементами которого будут элементы исходного, оканчивающиеся на цифру k. №2 Дан масив целых числ. Найти в этом массиве минимальный элмент m и максимальный M.
Ответы (1)
Задачи на массив (паскаль) : Массив (подсчёт суммы) а) Дан массив целых чисел. Найти сумму нечётных элементов. б) Дан массив. Определить максимальный и минимальный элемент.
Ответы (1)