Опишите на естественном языке или на одном из языков программирования алгоритм, позволяющий найти и вывести минимальное значение среди трёхзначных элементов массива, делящихся на 7.(паскаль)

var a, b, c: Integer;beginreadln(a, b, c);if (a mod 7 = 0) and (b mod 7 = 0) and (c mod 7 = 0) then begin  if (a < b) and (a < c) then writeln('Min = ', a)  else if (b < c) then writeln('Min = ', b)  else writeln('Min = ', c); end;end.