Произведение четных цифр

@Norgan · Регистрация: 25.11.2008

Студворк — интернет-сервис помощи студентам

Пожалуйста подскажите где ошибка

Задача.
Найти произведение всех четных цифр.

Как мне кажется вроде все правильно указал, а нет, где-то ошибаюсь

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
Program Number;
var n,i,k:integer;
P,R:real;
Begin
writeln('n=',' k=');
readln(n,k);
P:=1;
     For i:=n to k do
            if i mod 2=0 then
            R:=exp((k-n)/2*ln(n*k));
            P:=P*R;
writeln('P=',P:2:2);
End.

Помогите, если не трудно, найти ошибку

@Викдон · 19.12.2008, 01:54

Найти произведение всех четных цифр. В числе? что за "n" и что за "к"?

@Norgan · 19.12.2008, 01:58 **[ТС]**

Сообщение от Викдон

Найти произведение всех четных цифр. В числе? что за "n" и что за "к"?

Как я понял нужно указать диапазон чисел (от n до k), из них выбрать четные(т.е. кратные двум) и найти их произведение.

@Puporev · 19.12.2008, 08:48

Во-первых цифра и число это не одно и тоже.
R:=exp((k-n)/2*ln(n*k)); А эта формула какое имеет отношение к цифрам, четности и произведению? Может удосужитесь привести задание полностью, и без Ваших комментариев.

@Norgan · 19.12.2008, 15:24 **[ТС]**

Puporev, задание, к сожаленью, было преведено полностью - найти произведение всех четных цифр. Формула взята из геометрической прогрессии...тут не прав был, но просто не понимаю как добится, чтоб считалось произведение четных цифр

@Puporev · 19.12.2008, 15:31

Если Вы такой настойчивый, то доложу Вам, что четных цифр всего 4 и их произведение = 384.
Почему просили уточнить задание? Возможно нужно найти произведение четных цифр в каком-то числе, или в нескольких числах, тогда другое дело, число разлагается на цифры и четные перемножаются. Это как вариант.

@Norgan · 20.12.2008, 07:58 **[ТС]**

Сообщение от Puporev

Если Вы такой настойчивый, то доложу Вам, что четных цифр всего 4 и их произведение = 384.
Почему просили уточнить задание? Возможно нужно найти произведение четных цифр в каком-то числе, или в нескольких числах, тогда другое дело, число разлагается на цифры и четные перемножаются. Это как вариант.

эээ..извиняюсь, но не могли бы Вы растолковать, как это всего 4? Разве чётными цифрами не являються числа которые делятся на 2 без остатка(т.е. 2,4,8.. и т.д.)?

@Puporev · 20.12.2008, 09:09

Разве чётными цифрами не являються числа

Жесть для 1-2 класса, или для первого года службы, что более вероятно.

@Викдон · 20.12.2008, 12:41

да уж....... цифра это-0..9, числа состоят из цифр к примеру 35-число состоит из цифр 3 и 5.)
Четных цифр всего четыре: 2,4,6,8.

@Norgan · 20.12.2008, 16:33 **[ТС]**

ой, извиняюсь за тупость

З.Ы. программу написал) всем спасибо)

Сообщение от Puporev

Жесть для 1-2 класса, или для первого года службы, что более вероятно.

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

Новые блоги и статьи Все статьи Все блоги /
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .

@Викдон 67 / 67 / 24 Регистрация: 21.11.2008 Сообщений: 226
	19.12.2008, 01:54
	Найти произведение всех четных цифр. В числе? что за "n" и что за "к"? 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	19.12.2008, 08:48
	Во-первых цифра и число это не одно и тоже. R:=exp((k-n)/2ln(nk)); А эта формула какое имеет отношение к цифрам, четности и произведению? Может удосужитесь привести задание полностью, и без Ваших комментариев. 0

@Norgan 4 / 4 / 3 Регистрация: 25.11.2008 Сообщений: 58
	19.12.2008, 15:24 [ТС]
	Puporev, задание, к сожаленью, было преведено полностью - найти произведение всех четных цифр. Формула взята из геометрической прогрессии...тут не прав был, но просто не понимаю как добится, чтоб считалось произведение четных цифр 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	19.12.2008, 15:31
	Если Вы такой настойчивый, то доложу Вам, что четных цифр всего 4 и их произведение = 384. Почему просили уточнить задание? Возможно нужно найти произведение четных цифр в каком-то числе, или в нескольких числах, тогда другое дело, число разлагается на цифры и четные перемножаются. Это как вариант. 0

@Викдон 67 / 67 / 24 Регистрация: 21.11.2008 Сообщений: 226
	20.12.2008, 12:41
	да уж....... цифра это-0..9, числа состоят из цифр к примеру 35-число состоит из цифр 3 и 5.) Четных цифр всего четыре: 2,4,6,8. 0