Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
xxxZLODEUxxx
0 / 0 / 1
Регистрация: 18.05.2010
Сообщений: 12
#1

Используя один цикл, найти сумму 1!+2!+3!+...+N!

18.05.2010, 19:01. Просмотров 887. Ответов 1
Метки нет (Все метки)

6 Дано целое число N >0. Используя один цикл, найти сумму 1! +2! + 3! + ...+N! (выражение N! — N-факториал — обозначает произведение всех целых чисел от 1 до N: N! = 1•2•.. .•N). Чтобы избежать целочисленного переполнения, проводить вычисления с помощью вещественных переменных и вывести результат как вещественное число.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.05.2010, 19:01
Ответы с готовыми решениями:

Дано целое число N (> 0). Используя один цикл, найти сумму 1! + 2! + 3! + … + N!
Дано целое число N (> 0). Используя один цикл, найти сумму 1! + 2! + 3! + … +...

Используя один цикл, найти сумму N первых элементов последовательности
Дано целое число N > 0. Используя один цикл, найти сумму N первых элементов...

Найти сумму чисел натурального сюда от a до b используя цикл с предусловием
Найти сумму чисел натурального сюда от a до b используя цикл с предусловием.

Найти сумму чисел натурального сюда от а до b используя цикл с предусловием
Найти сумму чисел натурального сюда от а до b используя цикл с предусловием.

Найти сумму квадратов чисел натурального ряда от а до b используя цикл с параметром
Найти сумму квадратов чисел натурального ряда от а до b используя цикл с...

1
Delta
11 / 10 / 2
Регистрация: 17.11.2009
Сообщений: 126
18.05.2010, 21:22 #2
Лучший ответ Сообщение было отмечено xxxZLODEUxxx как решение

Решение

задачка шесть
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
program Factorial;
uses wincrt;
var i,t: integer;     k:real;
begin
repeat
write('vvedite chislo:');
readln (t);
until t>0;
k:=1;
for i:=1 to t  do
k:=k*i;
writeln ('Factorial raven: ' ,k:4:9);
readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.05.2010, 21:22

Найти сумму квадратов чисел натурального сюда от a до b используя цикл с параметром
Найти сумму квадратов чисел натурального сюда от a до b используя цикл с...

Вычислить сумму первых 8 чисел, используя цикл с предусловием
Вычислить сумму первых 8 чисел, используя цикл с предусловием

Вычислить сумму конечного числа слагаемых, используя цикл с параметром


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

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

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