сервис вопросов и ответовДан массив размерности M. Найти в нём минимальный элемент,
10-11 класс|
|
определить его порядковый номер. Вычислить количество нулей в массиве. Visual Basic
Kurban0604
25 февр. 2014 г., 13:17:14 (10 лет назад)
Marina201623542257
25 февр. 2014 г., 13:54:02 (10 лет назад)
INPUT "m - ", m
DIM a(m)
RANDOMIZE (TIMER)
FOR i = 1 TO m
a(i) = INT(RND * 20)
PRINT a(i);
NEXT i
PRINT
min = a(1)
imin = 1
FOR i = 2 TO m
IF a(i) < min THEN
min = a(i)
imin = i
END IF
IF a(i) = 0 THEN
k = k + 1 END IF
NEXT i
PRINT min; imin; k
Ответить
Другие вопросы из категории
Дано 80 вещественных чисел. Найти порядковый номер того из них, которое наиболее близко к какому-нибудь целому числу.
Помогите решить пожалуйста
Леголас хочет поразить из лука максимальное количество из десяти мишеней, обозначенных цифрами от 0 до 9. При этом он не хочет, чтобы сумма номеров
двух пораженных подряд мишеней составляла несчастливое для эльфов число 6 или более. Какую по номеру мишень Леголас может поразить последней, если первая его стрела полетела в мишень с номером 0?
Помогите решить.Паскаль Циклы .Из семи красных и восьми белых роз требуется составить букет из пяти роз. Перечислить все возможные варианты.Хотелось бы
попросить при составление каждой строчки расписывать что в ней происходит.
Читайте также
Дана матрица размерностью nxn найти
Дана матрица размерностью nxn найти минимальный элемент среди элементов расположенных над главной диагональю матрицы. Найти квадрат разности среди арифметических значений элементов матрицы ,находящихся ниже и выше главной диагонали
Дан массив из 5 элементов:4, 3, 14, 6, 12.
Разработать блок-схему алгоритма сортировки
элементов в порядке возрастания,
найти максимальный и минимальный
элементы.
Программирование.Паскаль.Массивы
1)Дан массив Р(15).Найти сумму всех отрицательных элементов с четными индексами.Полученный результат вывести на экран.
2)Ввести с пульта оператора массив МАС1 семь целых чисел. Переписать из МАС1 в МАС2 элементы значения которых положительные,в МАС3 элементы значения которых отрицательные. На пульт оператора вывести значения МАС1,МАС2,МАС3
Составить программу Дан массив натуральных чисел , размерность -12 !) Заполнение массива производить с клавиатуры 2) Вывести на печать
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
Вы находитесь на странице вопроса "Дан массив размерности M. Найти в нём минимальный элемент,", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.