Вопрос, который вызвал трудности

Написать программу которая выводит минимальный элемент введенного с клавиатуры массива целых чисел

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Program al;
var a: array[1..100] of integer;
 buf:integer;
 i,n,min:integer;
begin
writeln('n=');
readln(n);
writeln('vvedite massiv=');
for i := 1 to n do
readln(a[i]);
min:=a[1];
 for i:=1 to n do
 if a[i]writeln('mn=', min);
readln;
end.