Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
0 / 0 / 0
Регистрация: 30.11.2009
Сообщений: 5

Определить индексы всех элементов массива, значения которых больше 7

25.01.2010, 13:13. Показов 1915. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
дан одномерный массив a(n). определить индексы всех элементов значения которых больше 7
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
25.01.2010, 13:13
Ответы с готовыми решениями:

Определить количество элементов массива, значения которых больше СУММЫ соседних элементов
Дан одномерный массив из 15 элементов. Определить количество элементов, значения которых больше СУММЫ соседних элементов (предыдущего и...

Определить количество элементов массива, значения которых больше K
PascaABC Задание №1 N=12 Ввести число К Определить количество элементов массива, значения которых больше K. Задание №2 Поменять...

Найти индексы тех элементов массива, значения которых больше значения предыдущего элемента
Дан массив целых чисел.Найти индексы тех элементов массива, значения которых больше значения предыдущего элемента(начиная со второго).

1
 Аватар для STL1te
7 / 6 / 5
Регистрация: 08.12.2009
Сообщений: 105
25.01.2010, 14:38
Лучший ответ Сообщение было отмечено Dzott как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Program mas;
uses
  crt;
const
  n=10; //размер массива
type
  mas=array[1..n] of integer;
 var
   i:integer;
   a:mas;
 begin
 ClrScr;
   for i:=1 to n do
     begin
       writeln ('Vvedite ',i,'-i element massiva');
       readln (a[i]);
     end;
 //вводим элементы массива
 writeln ('Indexi elementov massiva kotorie > 7');
   for i:=1 to n do
     if a[i]>7 then
       write (i,' ');
 //если элемент больше 7, то выписываем его индекс
 readln;
 end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
25.01.2010, 14:38
Помогаю со студенческими работами здесь

Вывести индексы тех элементов массива, значения которых больше заданного числа А
Дан массив целых чисел, состоящий из 10 элементов. Заполнить его с клавиатуры. Помогите пожалуйста решить задачу!!! Дан массив целых...

Вывести индексы тех элементов массива, значения которых больше заданного числа А
Дан массив целых чисел, состоящий из 10 элементов. Заполнить его с клавиатуры. Найти: − сумму элементов, имеющих нечетное...

Знайти индексы тех элементов, значения которых больше заданного числа А.
Дано масив целых чисел.Знайти индексы тех элементов, значения которых больше заданного числа А.

Вывести индексы тех элементов, значения которых больше заданного числа А
))))))

Массив: Определить в какой строке номера элементов массива, значения которых больше значения предыдущего элемента.
Дан двумерный массив размерности 5x4. Заполнить его случайными числами на отрезке . Определить в какой строке номера элементов массива,...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru