5 умножить на 3 прибавить 3 умножить на 3 прибавить 3 и снова прибавить 3 ответ 12122
Program fgg;
const
b = 7;
var
a, s, r: Integer;
begin
for a := - 10 to 10 do
Writeln('s=', a + b, ' ', 'r=', a - b);
a := a + 5;
end.
Можно посчитать руками. Но это не интересно.
Заметим, что G(n+1)=F(n)+G(n)=(F(n-1)-G(n-1))+(F(n-1)+G(n-1))=2F(n-1);
G(n+2) = 2F(n)
Аналогично, F(n+1)=F(n)-G(n)=-2G(n-1)
F(n+2)=-2G(n)
Тогда F(5)=-2G(3)=-4F(1)=-4; G(5)=2F(3)=-4G(1)=-4
G(5)/F(5)=1
Меньше 4-х тут ничего нету. Обращаем первое: x >= 7. Т. е. это 7 и 8.
Чесно говоря не уверен но от 10 до 25 мигабайт