• Имеется массив А (1.h). Найти элемент массива, равный P

Ответы 2

  • Спасибо большое
  • // PascalABC.NET 3.3, сборка 1583 от 25.11.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(ReadInteger('h='),-99,99); a.Println;  var p:=ReadInteger('P=');  var i:=a.FindIndex(t->t=p);  if i>=0 then Writeln('Номер элемента ',i+1)  else Writeln('Нет такого элемента')end.Примерыh= 20-57 15 -50 89 -25 -85 -75 12 57 92 61 1 36 -78 4 -1 30 12 16 -71P= 66Нет такого элементаh= 1315 86 57 69 -58 -78 -20 14 -63 -92 -16 -40 73P= 14Номер элемента 8
    • Автор:

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

Войти через Google

или

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

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

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