Вычислить сумму выражения - Pascal ABC

  1. Здравствуйте. Решаю такую задачу: дано натуральное число n. Вычислить


textual

Код к задаче: «Вычислить сумму выражения - Pascal ABC»

var sum,p,f:real;
    k,i,n:integer;
begin
writeln('Ввести n');
readln(n);
sum:=0;
f:=1;
for k:=1 to n do
 begin
  f:=f*k;
  p:=1;
  for i:=0 to k do
  p:=p*(i+2);
  sum:=sum+(f+power(k,n-k+1))/(7*k*sqrt(k)+p);
  writeln('sum=',sum,' k=',k);
 end;
end.

СДЕЛАЙТЕ РЕПОСТ

9   голосов, оценка 4.222 из 5



Похожие ответы
  1. Вычислить сумму ряда

  1. Ввести трехзначное число .Вычислить корень квадратный второй цифры

  1. Найти сумму целых положительных чисел из промежутка от А до B, кратных 4.(значения А и В вводятся с клавиатуры)

  1. 34. Найти сумму положительных целых чисел, меньших 100

  1. Помогите решить, пожалуйста Вычислить y=tg(x+2)+ctg^2x(ctg(x+1)-tgx), при х=30 градусов, оформив в виде функций вычисление тангенса и котангенса.

  1. Нужно написать программу, в которой пользователь вводит альфа(alpha), а программа бы считывала z1=cos в квадрате от разности ((3/8)*pi-(alpha/4))-cos в квадрате от суммы ((11/8)*pi+(alpha/4)) z2=(корень из 2-х/2)*sin от дроби (alpha/2)

  1. Вычислить значение выражения. При этом найти область определения функций и обеспечить необходимую реакцию программы на некорректные ситуации.

  1. Дано числовую последовательность (100, 97, 94, ...). Найти сумму 30-ти членов последовательности чисел

  1. Определить и вывести сумму элементов, значения которых находятся в диапазоне от А до В. Количество элементов массива:14 Тип Элемента массива: Int Результат вывести в виде: A[1]=........ A[2]=......... A[3]=......... Большое спасибо, за помощь!