Рекуррентно-заданная функция - QBasic

  1. Задана следующая функция f(n) = SIN(f(n - 1)) + 1 при начальном условии f(1) = 1. Надо распечатать 20 её значений. ... примечание при n = 15 значения функции начинают повторяться и быть равными 1.934563


textual

Код к задаче: «Рекуррентно-заданная функция - QBasic»

DIM i AS LONG, f AS DOUBLE, n AS LONG
n = 20
f = 1
PRINT 1, f
FOR i = 2 TO n
    f = SIN(f) + 1
    PRINT i, f
NEXT i

СДЕЛАЙТЕ РЕПОСТ

10   голосов, оценка 4.000 из 5



Похожие ответы
  1. 4. Составить функцию, которая определяет, верно ли, что в числе вторая цифра с конца больше 6.

  1. Здраствуйте. Пожалуйста объясните мне пожалуста как использовать функции cos, sin, tng. Заранее всем спасибо.

  1. Я разрабатываю операционную оболочку на QBasic'e - QuickGUI (quickgui.narod.ru), и сейчас нужно создать диалоги типа Open File, Save File и т. п. Проблема в том, что в бейсике нет стандартных фукнций для работы с файлами. Помогите найти библиотеку с функциями для работы с файлами ("получить список файлов в папке", "список доступных дисков", и т. д., и прочее)!

  1. Всем доброго времени суток. Заранее благодарен за помощь. Даны пять различных целых чисел. Найти среди них два числа, модуль разности которых имеет наибольшее значение. Вычисление модуля разности оформить в виде процедуры-функции.

  1. Вывести на экран отрицательные функции y=4x(5-3x^2) при изменении x от 1 до 2 с шагом 0,1.