Помогите,пожалуйста!!Очень-очень необходимо!нужно решить через pascal!!буду очень

Помогите,пожалуйста!!
Очень-очень необходимо!
нужно решить через pascal!!
буду очень признательна !!!!

Задать свой вопрос
1 ответ
Var f1,g1,fn,gn:real;
begin
  f1:=1;
  g1:=1;
  for var i:=2 to 5 do begin
    fn:=f1-g1;
    gn:=f1+2*g1;
    writeln('F(',i,')=',fn,' G(',i,')=',gn);
    f1:=fn;
    g1:=gn;
  end;
  writeln('F(5)/G(5)=',fn/gn);
end.

Результат:
F(2)=0 G(2)=3
F(3)=-3 G(3)=6
F(4)=-9 G(4)=9
F(5)=-18 G(5)=9
F(5)/G(5)=-2
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт