Условие:
const n = 5;\na: array [1…n] of integer = (2, 9, 10, -19, 6);
\nvar i, b: integer;
\nbegin
\nb := a[1];
\nfor i := 2 to n do
\nif a[i] < b then b := a[i];
\nwriteln (b)
\nend.
![const n = 5; : array [1…n] of integer = (2, 9, 10, -19, 6); i, b: integer; := a[1]; i := 2 to n do a[i] < b then b := a[i]; (b) .](/public/images/library/external/library-detail-hero-book.png)
const n = 5;\na: array [1…n] of integer = (2, 9, 10, -19, 6);
\nvar i, b: integer;
\nbegin
\nb := a[1];
\nfor i := 2 to n do
\nif a[i] < b then b := a[i];
\nwriteln (b)
\nend.

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