Составить Алгоритм И Программу Обработки Членов Числовой Последователь

  • Автор темы Zorch
  • Дата начала
Z

Zorch

Гость
#2
Вроде как разобрался, но есть некоторые, непонятные мне, моменты:
Код:
uses crt;
var
a,b,c,d,p,x,x0,h:real;
m,n,k,i:integer;
begin
clrscr;
writeln('Введите A,B,C,D,x0,H,M,N');
read(A,B,C,D,x0,H,M,N);
P:=A;
if (B<P) then P:=B;
if (C>D) then
if (C<P) then P:=C else
if (D<P) then P:=D;
writeln('P=',P:5:2);
for i:=1 to M do
begin
x:=x0+(i-1)*H;
AK:={формула} <=============================================== №2 с картинки
write('A1=',AK:5:2,' ');
if AK{четный} then S:=AK else S:=0; <=============================== как проверить четность?
for k:=2 to N do
begin
AK:={формула} <============================================== №1 с картинки
write('A',k,'=',AK:5:2,' ');
if AK{четный} then S:=S+AK <===================================== как проверить четность?
end;
writeln;
writeln('Сумма четных членов S=',S:5:2,' при P=',P:5:2);
end;
End.
Помогите привести последовательность (красная кромка) к такому же результату, как в образце (синяя кромка)
 
Z

Zorch

Гость
#4
не пойму, как из десятичного логарифма получить экспанент
 
Z

Zorch

Гость
#6
Я уже весь день пялюсь на этот пример, перерыл кучу информации и мне все равно не понятно, нигде нет аналогии. Если нет желания помочь, зачем надо было писать?
ты последующий на предыдущий разделить не можешь?

Получается так
 

Whatka

Well-Known Member
09.10.2011
428
4
24
Минск
#7
не правильно
с факториалом ошибся и минус потерял

надо не пялится на пример,а решать его
вы за весь день даже поделить не смогли нормально

желание помоч?
я с радостью помогу
только суть же не решить за вас,а достичь вашего понимания
 
Z

Zorch

Гость
#8
Да я и сам хочу понять, но не могу никак. В каком месте ошибся с факториалом? В знаменателе k(k+1)!, тогда в числителе получается (k-1)((k-1)+1)!

Минус где потерял? Если в первой дроби, то там минус на минус дает плюс по идее
 

Whatka

Well-Known Member
09.10.2011
428
4
24
Минск
#12
да
реккурентное соотношение для к от 2
нулевой и первый член из исходного найди