• Дан целочисленный массив из 10 элементов. Элементы массива могут принимать произвольные значения. Опишите на языке программирования алгоритм, который находит и выводит номера двух элементов массива, наименее отличающихся друг от друга.

Ответы 3

  • Спасибо
    • Автор:

      luci
    • 6 лет назад
    • 0
  • Пожалуйста
  • // PascalABC.NET 3.2, сборка 1353 от 27.11.2016// Внимание! Если программа не работает, обновите версию!begin  var n:=10;  var a:=ArrRandom(n,1,99); a.Println;  var d:=100;  var i1,i2:integer;  for var i:=0 to n-2 do    for var j:=i+1 to n-1 do begin      var dd:=abs(a[i]-a[j]);      if dd<d then begin d:=dd; i1:=i; i2:=j end      end;  Writeln('Элементы ',i1+1,', ',i2+1)end.Пример47 55 18 58 16 77 43 95 13 86Элементы 3, 5
    • Автор:

      chloe27
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years