Предмет:
ИнформатикаАвтор:
elvis4Автор:
lucy18paАвтор:
cochranАвтор:
leo18Автор:
libertyАвтор:
christinecolonОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Матем ИЗ "...\Отделы\Обмен\";
ПЕР
массив_чисел: РЯД 100 ИЗ ЦЕЛ;
сч, мин, ном: ЦЕЛ;
УКАЗ
ОТ сч := 0 ДО РАЗМЕР(массив_чисел) - 1 ВЫП
массив_чисел[сч] := - УЗК(ВШИРЦЕЛ(Матем.случ() * 1000))
КОН;
мин := массив_чисел[0]; ном := 0;
ОТ сч := 1 ДО РАЗМЕР(массив_чисел) - 1 ВЫП
ЕСЛИ массив_чисел[сч] < мин ТО
мин := массив_чисел[сч]; ном := сч
КОН
КОН
(* мин - минимальное значение, ном - его номер *)
КОН Задание.
Обрати внимание на то, что считается фактическое минимальное значение, а не минимальный модуль.
Автор:
sassafrasДобавить свой ответ
Предмет:
ИсторияАвтор:
fortunatovcguОтветов:
Смотреть
Предмет:
МатематикаАвтор:
colonelОтветов:
Смотреть
Предмет:
МатематикаАвтор:
thomasОтветов:
Смотреть