Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.01.2008, 09:10   #1
Wizzard
Новичок
Джуниор
 
Регистрация: 17.01.2008
Сообщений: 1
Вопрос Массив (Turbo Pascal)

Люди помогите пожалуйста решить задачку по паскалю. Дан массив. M из KM вещественных чисел. Для каждого "особого" элемента вывести сумму предшествующих элементов, "особый" элемент, сумму следующих. Элемент "особый", если он больше каждого предшествующего. Или дайте пожалуйста объяснение, я так понял что нужно вывести максимальный элемент и сумму следующих и предшествующих, но препод говорит не так =(
Wizzard вне форума Ответить с цитированием
Старый 20.01.2008, 09:51   #2
puporev
Старожил
 
Регистрация: 13.10.2007
Сообщений: 2,740
По умолчанию

Дана последовательность 1 2 3 4 1 2 3 5 5 2 3 9 1.
Особые элементы 4, 5(первый), 9, т.е. такие, которые больше предшествующих, но меньше или равен следующему.
puporev вне форума Ответить с цитированием
Старый 20.01.2008, 09:59   #3
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,242
По умолчанию

Результат для последовательности: 1 2 3 4 1 2 3 5 5 2 3 9 1

6 (сумму предшествующих элементов), 4 ("особый" элемент), 31 (сумму следующих)
16, 5, 20
31, 9, 1
Sibedir вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Задача на Turbo Pascal W_P Помощь студентам 1 14.02.2008 18:24
Turbo Pascal в Delphi 7 adm34 Общие вопросы Delphi 5 04.02.2007 11:29