Ввести с клавиатуры массив из 5 элементов,найти минимальный из них. пример: введите пять чисел: 4 15 3 10 14 минимальный элемент 3 я пыталась, но эта прога не правильная, исправьте что не так! program qq; var a: array[1..5] of integer; min, i: integer; begin writeln('введите пять чисел: '); for i: =1 to 5 do read(a[i]); min: =a[1]; for i: =1 to 5 do if a[i] < min then min: =a[1]; writeln('минимальный элемент: ', min); end.