VPF::Задача в Паскале - Форум программистов

Митрей

Дата 3.3.2006, 20:49 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 3.3.2006

Репутация: нет
Всего: нет

Доброе время суток!

Обращаюсь с просьбой помочь - задача.

+++В последовательности из N элементов определить такой элемент из элементов с четными номерами и среднее арифметическое из элементов с суммой цифр в целой части больше 15. Сравнить полученные два числа и из большего вычесть меньшее.+++

Мы только начали Логику, но, чувствую, без нее не обойтись. Огромная просьба помочь. СПАСИБО!

P.S. Приезжайте в Петербург - покажу город! smile

Snowy

Дата 3.3.2006, 21:02 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: нет
Всего: 484

Цитата(Митрей @ 3.3.2006, 20:49

)

В последовательности из N элементов определить такой элемент из элементов с четными номерами

Какой такой?

Цитата(Митрей @ 3.3.2006, 20:49

)

Мы только начали Логику, но, чувствую, без нее не обойтись

Для начала стоит навести логику в вопросе. А потом уже ее "начинать".

+ Читаем правила вверху раздела.

SoWa

Дата 3.3.2006, 21:05 (ссылка)

(нет голосов)

Загрузка ...

Харекришна

Профиль
Группа: Комодератор
Сообщений: 2422
Регистрация: 18.10.2004

Репутация: нет
Всего: 74

Зачем логика?

Код


mas: array[1..100] of integer;
a,c,d: integer;
begin
a:=1;
for c:=1 to 100 do
begin
d:=mas[c];
if (d>a)and(с mod 2=0) then a:=d;
end;
end;

Это найдет максимальный элемент на четном месте.
А вот дальше задача непонятна. Какое среднее арифметическое?

Это сообщение отредактировал(а) SoWa - 4.3.2006, 17:20

--------------------

Всем добра smile

Zero

Дата 3.3.2006, 22:23 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: нет
Всего: 24

Цитата(SoWa @ 3.3.2006, 22:05

)

mas: array[1..100] of integer;
a,c: integer;
begin
a:=1;
for c:=1 to 100 do
begin
d:=mas[c];
if (c>a)and(с mod 2=0) then a:=c;
end;
end;

Это чё такое за бредятина... Присвоение несуществующей переменной d из неинициализированого массива.
PS: вопрос тоже задан слишком некорректно.

Guedda

Дата 4.3.2006, 08:52 (ссылка)

(нет голосов)

Загрузка ...

Подрывник

Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: нет
Всего: 78

Это он взял сто элементов. И это просто пример, он просто количество N=100.
А их инициализировать должен пользователь. Там же не написано, что да как.

И так: первое SoWa определил. Теперь необходимо пробежаться еще разок по массиву и найти все числа, сумма цифр которых больше 15.

--------------------

Ll 2

SoWa

Дата 4.3.2006, 17:22 (ссылка)

(нет голосов)

Загрузка ...

Харекришна

Профиль
Группа: Комодератор
Сообщений: 2422
Регистрация: 18.10.2004

Репутация: нет
Всего: 74

Каким образом? Можно переводить в String и складывать цифры. В Паскале- это громоздко. Не менее громоздко складывать остатки от деления на 10 в степени n и делить.

--------------------

Всем добра smile

profispb

Дата 4.3.2006, 18:25 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 220
Регистрация: 27.12.2005
Где: Санкт - Петербург

Репутация: нет
Всего: 1

Тебе в Ц. Помощи
И не перекладывай с больной головы на здоровую.

--------------------

В жизни, я люблю делать, то что я люблю. А не то что модно, престижно и выгодноЛюблю когда начинает работать, то что без меня не работало!

armageddon

Дата 10.3.2006, 17:12 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 117
Регистрация: 9.11.2005
Где: 239

Репутация: нет
Всего: нет

то Митрей:
нечего позорить Питер, напиши нормально вопрос, чтобы он был хоть немного понятен(а лучше чтобы понял каждый)

Guedda

Дата 10.3.2006, 18:25 (ссылка)

(нет голосов)

Загрузка ...

Подрывник

Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: нет
Всего: 78

В принципе, вопрос понятен. Только можно помочь, но не написать за человека код.
В Дельфи это делается очень просто. А в Паскале... Хм... Ты начни, а мы поможем smile

--------------------

Ll 2

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »