Напишите программу, которая в последовательности натуральных чисел определяет минимальное положительное число, кратное 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; Братик, советую тебе это всё выучить, иначе в старших классах тебе конец))
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;
Братик, советую тебе это всё выучить, иначе в старших классах тебе конец))