Дан целочисленный массив из 30 элементов. Элементы массива изначально могут принимать целые значения от 1 до 10000 включительно. Опишите алгоритм, который находит минимум среди элементов массива, а затем делит каждый элемент со значением кратным найденному минимуму. Гарантируется, что хотя бы один такой элемент есть в массиве. В качестве результата необходимо вывести измененный массив, каждый элемент выводится с новой строчки.Запрещается использовать переменные, не описанные ниже, но разрешается не использовать некоторые из описанных переменных.Написать фрагмент программы на месте многоточия.ConstN:=30;Vara: array [1… N] of longint; i, j, k: longint; beginfor i:=1 to N doreadln ([a[i]);…..end.