Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
em130STM
07.01.2022 18:56 •
Информатика
Написать программу поиска минимального значения в массиве, вывести на экран минимальное значение и номер (индекс) этого значения.
Ответ:
ceneral
20.08.2020 23:43
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
var i:=a.IndexMin;
Writeln('Минимальный элемент ',a[i],' имеет индекс ',i+1)
end.
Пример
n= 15
66 -91 75 27 7 -95 96 48 -35 77 49 71 -13 25 -8
Минимальный элемент -95 имеет индекс 6
0,0
(0 оценок)
Популярные вопросы: Информатика
S1mple11111
14.03.2023 13:17
Один символ алфавита племени джумбо несет 3 бита информации.сколько всего символов в алфавите племени?...
LELEGEG
25.05.2023 00:15
1. Ученик нарисовал 3 изображения. Данные изображения хранятся в оперативной памяти. Одно изображение требует 15 Кб памяти. Определите, какой объём заняли изображения в памяти оперативно-запоминающего...
данил10131
21.10.2022 01:10
Какое проверочное слово к слову ручка...
баги82
12.03.2020 08:00
Напишите лаболаторную работу на тему вода...
NetronPozitiv
12.03.2020 08:00
Сравните значения выражения m=2a+4 и n=3a+6...
АНooop
12.03.2020 08:00
9.отметь ряд, в котором все местоимения пишутся раздельно. а.сколько(нибудь), (ни)какой; б.(не)(о)чем, (ни)(от)кого; в.(ни)кого, какой(то); г.(ни)чем, (не)который. 10.укажи ряд, в...
плртпломм
12.03.2020 08:00
Х⁴- х³- 10х²+2х+4=0 решить уравнение...
azzzzzi208
12.03.2020 08:00
Составьте энтелект карту про александра 1 надо....
Dalishka808
12.03.2020 08:00
Срешением 14sin19° делить на sin341°...
simalilova
12.03.2020 08:00
Подскажите главную мысль рассказа приключения электроника...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
var i:=a.IndexMin;
Writeln('Минимальный элемент ',a[i],' имеет индекс ',i+1)
end.
Пример
n= 15
66 -91 75 27 7 -95 96 48 -35 77 49 71 -13 25 -8
Минимальный элемент -95 имеет индекс 6