отдел +;
использует из "";
пер
массив_чисел: ряд 100 из цел;
сч, мин, ном: цел;
указ
от сч : = 0 до размер(массив_чисел) - 1 вып
массив_чисел[сч] : = - узк(вширцел(.случ() * 1000))
кон;
мин : = массив_чисел[0]; ном : = 0;
от сч : = 1 до размер(массив_чисел) - 1 вып
если массив_чисел[сч] < мин то
мин : = массив_чисел[сч]; ном : = сч
кон
кон
(* мин - минимальное значение, ном - его номер *)
кон .
обрати внимание на то, что считается фактическое минимальное значение, а не минимальный модуль.
Поделитесь своими знаниями, ответьте на вопрос:
Каждой науке поставьте в соответствие изучаемых ею объекты астрономия биология технология информатика прошлое человечества колчественные отношения космические тела земная поверхность растителиный и животный мир информационные процессы техничекие устройства