Пожалуйста посчитайте♥Дан массив из 20произвольныхэлементов, каждый изкоторых не больше 100.Найдите максимальныйэлемент кратный 6.

Допустим d - переменная массива, тогда основной код будет выглядеть так (на паскале):

max = -101;
for i = 1 to 20 do
  if (d(i) > max) and (d(i) mod 6) = 0 then max = d(i);
if max = -101 then
  writeln('В массиве нет ни одного подходящего элемента')
else
  writeln(max);