Решите по Информатике ве нужно там способ решения.
Program gt;
var i:integer;
f:array [0.. 100]of integer;
begin
writeln(F(,1,) = ,1);
writeln(F(,2,) = ,1);
f[1]:=1;
f[2]:=1;
for i:=3 to 7 do
begin
f[i]:= f[i-2]*(i-1) + 2;
writeln(F(,i,) = ,f[,i-2,] * ,i-1,+ 2 =,f[i-2],*,i-1,+ 2=, f[i]);
end;
end.
Напиши все изменения там где надо в программе и он выводить всё что тебе надо
Оцени ответ
