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