Предмет: Информатика,
автор: OleskaLove2014
помогите пожалуйста с паскалем.
напишите программу, определяющую первое вхождение заданного целого числа X в массив целых чисел, заведомо содержащий это число.
Ответы
Автор ответа:
0
PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
Writeln('Позиция ',a.IndexOf(ReadInteger('Введите искомое число:'))+1);
end.
Пример
n= 15
23 -16 15 32 -17 -32 -22 -5 -20 22 -19 -5 -36 23 31
Введите искомое число: -32
Позиция 6
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
Writeln('Позиция ',a.IndexOf(ReadInteger('Введите искомое число:'))+1);
end.
Пример
n= 15
23 -16 15 32 -17 -32 -22 -5 -20 22 -19 -5 -36 23 31
Введите искомое число: -32
Позиция 6
Похожие вопросы
Предмет: Физика,
автор: znatik68
Предмет: Русский язык,
автор: asianurmamatova15
Предмет: Английский язык,
автор: p250534
Предмет: Математика,
автор: nika1112004
Предмет: Обществознание,
автор: ник1632