Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 25, средняя оценка - 4.76
lunatik125
4 / 4 / 1
Регистрация: 21.05.2010
Сообщений: 41
#1

Произведение n первых нечетных чисел равно p - Pascal

02.06.2010, 12:57. Просмотров 4178. Ответов 3
Метки нет (Все метки)

Произведение n первых нечетных чисел равно p. Сколько сомножителей взято? Если введенное число n не является указанным произведением, сообщить об этом.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.06.2010, 12:57
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Произведение n первых нечетных чисел равно p (Pascal):

Написать программу, которая вычисляет произведение первых n целых положительных нечетных чисел
Написать программу, которая вычисляет произведение первых n целых положительных...

Найти сумму кубов первых шести нечетных натуральных чисел
Найти сумму кубов первых шести нечетных натуральных чисел

Составить программу, которая формирует массив из 7 случайных целых чисел, принадлежащих промежутку [-14;9], и вычисляет произведение нечетных чисел.
Составить программу, которая формирует массив из 7 случайных целых чисел, ...

Написать программу,которая вычисляет сумму первых N нечетных положительных чисел
Написать программу,которая вычисляет сумму первых N нечетных положительных...

Найти наибольший возможный НОД трех чисел, если их произведение равно 56824590636
Произведение трех чисел равно 56824590636. Найдите наибольший возможный НОД...

Произведение первых n целых положительных чисел.
Написать программу, которая вычисляет произведение первых n целых положительных...

3
Puporev
Модератор
54146 / 41779 / 28885
Регистрация: 18.05.2008
Сообщений: 98,327
02.06.2010, 13:12 #2
Цитата Сообщение от lunatik125 Посмотреть сообщение
Если введенное число n не является указанным произведением, сообщить об этом.
Так n и не будет никогда произведением, разве что n=p=1.

Добавлено через 6 минут
Наверное это нужно....
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var n,k:byte;
    p,s:longint;
begin
clrscr;
write('Введите произведение нескольких первых нечетных натуральных чисел p=');
readln(p);
s:=1;
n:=1;
k:=1;
while s<p do
 begin
  k:=k+2;
  n:=n+1;
  s:=s*k;
 end;
if s<>p then write('Число ',p,' не является произведением первых нечетных чисел')
else write('Взято множителей - ',n);
readln
end.
1
lunatik125
4 / 4 / 1
Регистрация: 21.05.2010
Сообщений: 41
02.06.2010, 13:12  [ТС] #3
ок пусть так а прогу не поможишь написать ина4е мне практику не сдать будет !
0
Puporev
Модератор
54146 / 41779 / 28885
Регистрация: 18.05.2008
Сообщений: 98,327
02.06.2010, 13:21 #4
Цитата Сообщение от lunatik125 Посмотреть сообщение
а прогу не поможишь написать
Не-а.....
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.06.2010, 13:21
Привет! Вот еще темы с решениями:

Вывести таблицу квадратов первых пяти целых положительных нечетных чисел, вводимых с клавиатуры
Задание 2. написать программу которая выводит таблицу квадратов первых пяти...

Вычислить произведение целых нечетных чисел от t до n (t<n)
Помогите пожалуйста решить:cry: Вычислить произведение целых нечетных чисел...

Написать программу, которая выводит таблицу квадратов первых десяти целых положительных нечетных чисел
Написать программу, которая выводит таблицу квадратов первых десяти целых...

Найти произведение двузначных нечетных чисел, кратных 13
Всем привет! У меня ужасно не хватает времени и нужно решить задачи с помощью...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru