Написать программу, которая выдаст на экран номер элемента массива равный -25, если такого не окажется, то вывести на экран фразу «такого числа нет». (Это необходимо сделать в Pascal)

Информатика

Ответить

Ответы

ПаршинАндрей1928

21.03.2021

PascalABC.NET версия 3.7.1

var n := ReadInteger('n=');

var a := ReadArrInteger('Вводите:', n);

var i := a.IndexOf(-25);

if i < 0 then

Print('такого числа нет')

else

Print(i + 1)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Написать программу, которая выдаст на экран номер элемента массива равный -25, если такого не окажется, то вывести на экран фразу «такого числа нет». (Это необходимо сделать в Pascal)