a1=b1=1; ak=3*bв цикле под номером к-1 + 2*фв цикле под номером к-1 bk=2*aв цикле под номером к-1 + bв цикле под номером к-1;
где k = 2,3,..,n
Пожалуйста помогите с задачей кто может!!! 
примерно вот так:
program pr98;
uses crt;
var a,ak,b,bk,k,n:integer;
begin
clrscr;
writeln('vveditem konechnoe znachenie');
readln(n);
a:=1;
b:=1;
ak:=0;
bk:=0;
for k:=2 to n do
begin
for k:=n to k-1 do
a:=a*k;
b:=b*k;
ak:=(3*b)+(2*a);
ak:=ak*k;
end;
for k:=n to k-1 do
begin
a:=a*k;
b:=b*k;
bk:=(2*a)+b;
bk:=bk*k;
end;
writeln('ak=',ak:6);
writeln('b=',bk:6);
readln;
end.[img]http://imageshost.ru/links/9e2aad156203a5426ce2118e9a0021f2[/img]
Да и кстати С Наступающим ВАС !!!!
