tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
напишите программу, определяющую
напишите программу, определяющую первое вхождение заданного целого числа x в массив целых чисел, заведомо содержащий это число.
ufs09225
3 21.09.2019 23:20
0
Ответы
POGBOOM
08.10.2020 08:11
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
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ariana76
20.06.2019 19:12
1)составить алгоритм для вычисления суммы значений квадратов корней для первых 5 натуральных чисел 2)составить алгоритм для вычисления суммы квадратов первых 10 натуральных...
влада12342
20.06.2019 19:07
Если результат нижеследующего фрагмента программы s равен 78, то найдите количество повторений: s: =random(random(2)); for i: =-3+random(1) to x do s: =s+2*i...
kayseriliadige
20.06.2019 20:50
1)рассчитайте объем видеопамяти,необходимо для хранения графического изображения,занимающего весь экран монитора с разрешением 1024*768 и количеством отображаемых...
максим1503889900
20.06.2019 20:50
Ввести натуральное число n вывести квадраты и кубы всех чисел от 1 до n. желательно в кумире или на любом другом алгоритмическом языке....
Masanet
10.01.2021 13:11
Нaрисовать блок-схему aлгоритмa решения задачи : Дан вектор A , состоящий из десяти элементов. Нaйдите ср.aриф положительных элементов векторa...
арллтссрдз
10.01.2021 13:20
Створити квадратний масив довільної розмірності, заповнений нулями. Вивести на екран. Замінити нулі головної діагоналі на 1. Вивести результат на екран...
НМИ2003
29.05.2019 12:20
Y=( в числителе) под корнем х-ab ( в знаменателе) 1-х^2 паскаль...
shakmatovakseni
29.05.2019 12:30
Какой информационный объём оперативной память, если количество ячеек составляет 2147483648...
LisuNYfka3
29.05.2019 12:30
Программирование на языке паскаль. заставить пользователя ввести отрицательное число. : )...
ivannanikolaeva
07.09.2019 02:50
Составьте алгоритм (pascalabc), в результате которого получится слово , состоящее из букв a , b , c , d , e , f , g , h , i , j , k , l , стоящих в случайном порядке,...
Популярные вопросы
Диагонали четырехугольника 13см и 8см. найдите периметр параллелограмма...
1
Оцените справедливость ниже утверждения. несмотря на то что естественный...
2
Поставь к каждому слову вопрос. учитель,тетрадь ,музыкант ,шофёр...
2
Обозначить буквы мягких звуков. хитер котик...
1
Сколько содержится 3 часа 20 минут в 20 часах...
2
Нужно перевести сочинение на казахский язык. если бы я стала депутатом,...
1
Решите примеры по действиям: (2,4)-111: (-37) 12,4: (-,2) -18:...
1
Можно ли сказать,что с суффикса образовали однокоренное слово:...
1
Якщо сума 2015 натуральних чисел дорiвнюэ 2016,тодi чому дорiвнюэ...
2
Прилежный, усердный, старательный. а)антонимы б)синонимы....
1
Внимание! Если программа не работает, обновите версию!
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