Составить блок-схему алгоритма и программу на алгоритмическом языке программирования БЕЙСИК обработки одномерного массива. Заполнение массива элементами организовать путем ввода с клавиатуры
Dim n As Integer, i As Integer, imin As Integer Input "n=",n ReDim a(1 To n) As Integer Input "";a(1) imin = 1 For i = 2 To n Input "";a(i) If a(i) < a(imin) Then imin = i Next i Print "a(";imin;")=";a(imin)
