4 / 4 / 3
Регистрация: 25.11.2008
Сообщений: 58
1

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

19.12.2008, 00:16. Показов 3509. Ответов 9
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Пожалуйста подскажите где ошибка

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

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

Код
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.
Помогите, если не трудно, найти ошибку
0
19.12.2008, 00:16
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
19.12.2008, 00:16
Ответы с готовыми решениями:

Дано случайное число. Найти произведение четных цифр этого числа
Дано случайное число. Найти произведение четных цифр этого числа.

Вычислить произведение минимальных элементов четных столбцов. Где произведение будет кратно 7, поменять местами первую и последнюю строки
Даны массивы A{30,20},B{40,50} - целых чисел. Вычислить произведение минимальных элементов четных столбцов. В том массиве, где произведение...

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

9
 Аватар для Викдон
67 / 67 / 24
Регистрация: 21.11.2008
Сообщений: 226
19.12.2008, 01:54 2
Найти произведение всех четных цифр. В числе? что за "n" и что за "к"?
0
4 / 4 / 3
Регистрация: 25.11.2008
Сообщений: 58
19.12.2008, 01:58  [ТС] 3
Цитата Сообщение от Викдон Посмотреть сообщение
Найти произведение всех четных цифр. В числе? что за "n" и что за "к"?
Как я понял нужно указать диапазон чисел (от n до k), из них выбрать четные(т.е. кратные двум) и найти их произведение.
0
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
19.12.2008, 08:48 4
Во-первых цифра и число это не одно и тоже.
R:=exp((k-n)/2*ln(n*k)); А эта формула какое имеет отношение к цифрам, четности и произведению? Может удосужитесь привести задание полностью, и без Ваших комментариев.
0
4 / 4 / 3
Регистрация: 25.11.2008
Сообщений: 58
19.12.2008, 15:24  [ТС] 5
Puporev, задание, к сожаленью, было преведено полностью - найти произведение всех четных цифр. Формула взята из геометрической прогрессии...тут не прав был, но просто не понимаю как добится, чтоб считалось произведение четных цифр
0
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
19.12.2008, 15:31 6
Если Вы такой настойчивый, то доложу Вам, что четных цифр всего 4 и их произведение = 384.
Почему просили уточнить задание? Возможно нужно найти произведение четных цифр в каком-то числе, или в нескольких числах, тогда другое дело, число разлагается на цифры и четные перемножаются. Это как вариант.
0
4 / 4 / 3
Регистрация: 25.11.2008
Сообщений: 58
20.12.2008, 07:58  [ТС] 7
Цитата Сообщение от Puporev Посмотреть сообщение
Если Вы такой настойчивый, то доложу Вам, что четных цифр всего 4 и их произведение = 384.
Почему просили уточнить задание? Возможно нужно найти произведение четных цифр в каком-то числе, или в нескольких числах, тогда другое дело, число разлагается на цифры и четные перемножаются. Это как вариант.
эээ..извиняюсь, но не могли бы Вы растолковать, как это всего 4? Разве чётными цифрами не являються числа которые делятся на 2 без остатка(т.е. 2,4,8.. и т.д.)?
0
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
20.12.2008, 09:09 8
Разве чётными цифрами не являються числа
Жесть для 1-2 класса, или для первого года службы, что более вероятно.
0
 Аватар для Викдон
67 / 67 / 24
Регистрация: 21.11.2008
Сообщений: 226
20.12.2008, 12:41 9
да уж....... цифра это-0..9, числа состоят из цифр к примеру 35-число состоит из цифр 3 и 5.)
Четных цифр всего четыре: 2,4,6,8.
0
4 / 4 / 3
Регистрация: 25.11.2008
Сообщений: 58
20.12.2008, 16:33  [ТС] 10
ой, извиняюсь за тупость
З.Ы. программу написал) всем спасибо)
Цитата Сообщение от Puporev Посмотреть сообщение
Жесть для 1-2 класса, или для первого года службы, что более вероятно.
И извиняюсь, но вы не правы. Да, я может пока чего-то не понимаю или не знаю, но знаете, я стараюсь(гугл в помощь), но бывает такое, что просто не понимаешь как должна выглядить подобная программа, а из ряда приближенно-похожей программы не найти. Но благодаря вам я начал разбиратся в некоторых аспектах и успешно делаю аналогичные задания. Потому просто - спасибо Вам.
0
20.12.2008, 16:33
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
20.12.2008, 16:33
Помогаю со студенческими работами здесь

Найти такое число, что сумма его цифр превосходит произведение цифр этого же числа на 1
сумма цифр заданного четырехзначного N превосходит произведение цифр этого же числа на 1. ПОМОГИТЕ ПОЖАЛУЙСТА

Ввести 10 цифр. Найти произведение всех четных
var i: BYTE; m:array of integer; d: real; begin write('Введите числa : '); for i:= 1 to 10 do begin ...

Для каждого элемента матрицы с четным индексом найти и вывести сумму нечетных цифр и произведение четных
2)Дан массив целых чисел. Для каждого элемента с четным индексом найти и вывести сумму нечетных цифр и произведение четных.(через процедуру...

Найти сумму четных цифр и количество отрицательных цифр числа
Дано натуральное число n. Найти сумму четных цифр и количество отрицательных цифр.

Найти сумму и произведение четных/нечетных цифр заданного числа N
Найти сумму и произведение четных/нечетных цифр заданного числа N


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Отключение отслеживания файла, занесенного в .gitignore в Git
hw_wired 10.02.2025
Git помогает следить за изменениями в проекте, но иногда требуется исключить определенные файлы из системы контроля версий. Это могут быть конфигурационные файлы с локальными настройками, временные. . .
Что такое use strict в JavaScript
hw_wired 10.02.2025
Директива use strict - способ перевода JavaScript-кода в строгий режим работы, который делает язык более безопасным и предсказуемым. Она появилась в ECMAScript 5 как ответ на многочисленные проблемы,. . .
Как в jQuery проверить, что элемент скрыт
hw_wired 10.02.2025
jQuery предоставляет несколько эффективных способов определить, скрыт элемент или отображается на странице. Самый простой метод использует специальные селекторы :hidden и :visible. Селектор :hidden. . .
Как проверить (check out) ветку Git в удаленном репозитории
hw_wired 10.02.2025
Проверка удаленной ветки в Git требует понимания нескольких базовых концепций и точного выполнения определенной последовательности действий. Для начала необходимо получить актуальную информацию о. . .
chucknorris в HTML и другие обозначения цветов
hw_wired 10.02.2025
HTML, как основной язык разметки веб-страниц, прошел длинный путь развития в плане работы с цветами. На заре развития веб-технологий разработчики могли использовать только базовый набор из 16. . .
Стек и куча: отличия и назначение
hw_wired 10.02.2025
Управление памятью - ключевой элемент работы любой программы. В современных языках программирования память делится на две основные области: стек и кучу. Каждая из них обладает уникальными. . .
Комментарии в JSON
hw_wired 10.02.2025
JSON - текстовый формат обмена данными, построенный на основе синтаксиса JavaScript. Этот формат отличается простотой, читаемостью и широкой поддержкой во всех современных языках программирования. . . .
Перезаписываем локальные файлы с помощью git pull
hw_wired 10.02.2025
Git pull - незаменимая команда для синхронизации локального репозитория с удаленным. При работе над проектом в команде разработчиков часто возникает необходимость получить актуальные изменения,. . .
Оператор --> в C++
hw_wired 10.02.2025
Оператор --> (называемый "spaceship operator" или оператор космического корабля) - важное нововведение в стандарте C++20, упрощающее реализацию операций сравнения в пользовательских типах данных. . . .
Отмена git add до коммита
hw_wired 10.02.2025
Git предлагает несколько методов для отмены индексации файлов перед созданием коммита. Разработчики часто сталкиваются с ситуацией, когда нужно убрать файлы из индекса, не теряя внесенные изменения в. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru