Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
DekaS
0 / 0 / 1
Регистрация: 07.12.2011
Сообщений: 24
#1

Вычислить, сколько раз введенное с клавиатуры число встречается в массиве - Pascal ABC

08.12.2011, 22:05. Просмотров 740. Ответов 2
Метки нет (Все метки)

Здравствуйте! Помогите пожалуйста написать программу, которая вычисляет, сколько раз введенное с клавиатуры число встречается в массиве.
Буду очень благодарен за помощь.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.12.2011, 22:05
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вычислить, сколько раз введенное с клавиатуры число встречается в массиве (Pascal ABC):

Проверить, сколько раз в массиве встречается введенное с клавиатуры число
ЗАДАНие РАСЧЕТНО-ГРАФИЧЕСКОЙ РАБОТЫ К предложенным задачам разработайте...

Подсчитать, сколько раз в строке встречается слово введенное с клавиатуры
Посчитать сколько раз в строке встречается слово введенное с клавиатуры.

Определить, сколько раз число 2 встречается в массиве
Дан массив из N чисел. Определить, сколько раз число 2 встречается в массиве....

Определить, сколько раз число 2 встречается в массиве
Дан массив из N чисел. Определить, сколько раз число 2 встречается в массиве....

Определить, сколько раз число X, встречается в массиве L
Дан массив L(13), cколько раз число X, встречается в массиве L.

Определить, сколько раз в данном массиве встречается число 5
PASCAL ABC составить программу решения след. задачи. Задан одномерный массив из...

2
abcpascal
5 / 5 / 6
Регистрация: 26.11.2011
Сообщений: 51
08.12.2011, 22:16 #2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Var a:array[1..10] of integer; b:integer; i,k:byte;
begin
Writeln('Vvedite zadannoe chislo');
readln(b);
Writeln;
k:=0;
Writeln('Zapolnenie massiva');
for i:=1 to 10 do
begin
readln(a[i]);
Write;
if a[i]=b
then inc(k);
end;
Writeln('Chislo - ',k,' raz');
readln;
end.
вот
1
DekaS
0 / 0 / 1
Регистрация: 07.12.2011
Сообщений: 24
08.12.2011, 22:43  [ТС] #3
Спасибо большое Поставил +1
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.12.2011, 22:43
Привет! Вот еще темы с решениями:

Подсчитайте, сколько раз в массиве встречается максимальное по величине число
1- Дан одномерный массив. Подсчитайте, сколько раз в этом массиве встречается...

Подсчитайте, сколько раз в массиве встречается максимальное по величине число
1-Дан одномерный массив. Подсчитайте, сколько раз в этом массиве встречается...

Определить, находится ли в массиве введенное с клавиатуры число
Помогите. пожалуйста. Напишите программу, которая проверяет, находится ли в...

С клавиатуры вводится символьная строка длиной. Определите, сколько раз встречается в строке каждый из входящи
С клавиатуры вводится символьная строка длиной. Определите, сколько раз...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru