Ответ:
Паскалем не владею но алгоритм такой . 1. создаёшь массив Целочисленный . 2. Считываешь туда числа . 3.Создаёшь целочисленную переменную min . 4 Присваеваешь ей значение 1 Элемента массива ( если не ошибаюсь в паскале тоже он под индексом 0 ) 5. Cоздаёшь цикл от 1 до Длинны массива . 6. Внутри цикла через if сравниваешь , если массив под индексом 'i' < чем min , тогда min = значению массива под индексом 1.
Объяснение: