Протестировать данный метод, выполнив 3-4 цикла:Значения xi рассчитываются циклически:

Протестировать заданный алгоритм, выполнив 3-4 цикла:

Значения xi рассчитываются циклически: xi=1.5 * xi-1 - 0.8*xi-2; i=2,3,...k.
Вычислить xk, не применяя массивов, если x0=5; x1=-4

Задать свой вопрос
Кирилл Курушонков
На Turbo=pascal?
1 ответ

Выполнил на Turbo-Pascal

Uses Crt;

Var x0, x1, xk : Real;

     i, k : Integer;

Begin

 k:=10;

 x0:= Sqr(Cos(1));

 x1:=-Sqr(Sin(1));

 For i:=2 to k do

   begin

     xk:=1.5*x1 - 0.8*x0;

     x0:=x1;

     x1:=xk;

   end;

End.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт