Напишите программу, которая в последовательности натуральных чисел определяет минимальное положительное число, кратное 5. Программа получает на вход количество чисел в последовательности,а затем сами числа

type arr = array[1..1000];i = integer;beginfor i=1 to 1000 do begin arr[i]:=random(30000); arr[random(1000)]:= 5; { :)))} end;Writeln('5');Writeln('Xtnj-yfljtkj');end;end;Братик, советую тебе это всё выучить, иначе в старших классах тебе конец))