В массиве n элементов.
Случайным образом вводятся целые числа от 0 до 999.
x — ведённое с клавиатуры число.
i — цикловая переменная.
var
a : array [1..100] of integer;
x, i, n : integer;
begin
readln (n);
for i := 1 to n do
a [ i ] := random (1000);
readln (x);
for i := 1 to n do
if a [ i ] := x then
writeln (‘введённое с клавиатуры число находится в массиве’);
end.
Если количество элементов в массиве известно изначально, например 25, тогда строку » readln (n); » убираете, а строки
» for i := 1 to n do «
заменяете на
» for i := 1 to 25 do «
Минус данной программы: если введённое с клавиатуры число не находится в массиве, то программа ничего не выводит.
Алексей Снакин Отвечено 24 сентября 2019
- ‘ data-html=»true»> Поделиться
- Комментариев (0)
Источник: matfaq.ru
Способы выводы элементов массива
Решения задач на Си в Линyкс
Напишите программу, которая проверяет, находится ли введенное с клавиатуры число в массиве. Массив должен вводится во время работы программы.
/*
Программа проверяет, находится ли введенное с клавиатуры число
в массиве. Массив вводится с клавиатуры.
*/
#include «locale.h»
#include «curses.h»
#include «stdio.h»
main()
<
int s[HB];
int obr;
int found;
int i;
char *log;
log = setlocale(LC_CTYPE,»ru_RU.UTF-8″);
initscr();
printw(«Поиск в массиве методом перебора.n»);
printw(«Введите в одной строке %i целых чисел.n», HB);
printw(«-> «);
scanw(«%i %i %i %i %i», s[1], s[3],
printw(«nВведите образец для поиска (целое число) -> «);
scanw(«%i»,
found = 0;
i = 0;
do
<
if(s[i] == obr)
found = 1;
else
i++;
>
while(!found i < HB);
if(found)
printw(«Совпадение с элементом s[%i] = %i», i + 1, s[i]);
else
printw(«Совпадений нет.»);
getch();
endwin();
return 0;
>
Источник: cirishen.blogspot.com
Написать программу которая проверяет находится ли в массиве введенное с клавиатуры число
написать программу которая проверяет находится ли в массиве введенное с клавиатуры число. массив должен вводиться случайным образом(pascal)
Answers
x, i, n : integer;
begin
readln (n);
for i := 1 to n do
a [ i ] := random (1000);
readln (x);
Как ввести список в python. Как ввести список с клавиатуры в питоне
for i := 1 to n do
if a [ i ] := x then
writeln (‘введённое с клавиатуры число находится в массиве’);
end.
Если количество элементов в массиве известно изначально, например 25, тогда строку » readln (n); » убираете, а строки
» for i := 1 to n do «
заменяете на
» for i := 1 to 25 do «
Минус данной программы: если введённое с клавиатуры число не находится в массиве, то программа ничего не выводит.
1 votes Thanks 4

a:array [1..100] of integer;
Источник: scholar.tips