Найти первое число Фибонначи, которое больше за заданое число Т - Turbo Pascal

Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.50/6:

@FREYfMI 2 / 2 / 2 Регистрация: 17.10.2014 Сообщений: 111
		1
	Найти первое число Фибонначи, которое больше за заданое число Т 11.02.2015, 20:18. Показов 1208. Ответов 2 Метки нет (Все метки) числа Фибоначчи определяются рекуррентными формулами: f0=f1=1 fn=fn-1+fn-2 Найти первое число Фибонначи, которое больше за заданое число Т. Нужно до 11 часов, кто может помогите написать, а я разберусь сам. 0

Заказать работу у эксперта

Лучшие ответы (1)

Сообщение: #7217390

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

11.02.2015, 20:18

Ответы с готовыми решениями:

Циклы (while..do, repeat..until). Среди чисел ряда найти первое число, которое больше данного числа
Привет всем! Помогите решить задачу. Среди чисел 1,1+\frac{1}{2},1+\frac{1}{2}+\frac{1}{3},......

Дано число n. Найти первое натуральное число квадрат которого больше n
Дано число n. Найти первое натуральное число квадрат которого больше n.

В массиве A[M×N].Найти количество елементов, которые больше чем заданое число T
В массиве A.Найти количество елементов, которые больше чем заданое число T.

Данно вещественное число X. Найти в нем первое число десятка, число десятых долей.
помогите плз решить Данно вещественное число X. Найти в нем первое число десятка, число десятых...

@Puporev Почетный модератор 64305 / 47602 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	11.02.2015, 20:21	2
	f₀=f₁=1 f_n=f_n-1+f_n-2 1

JuriiMW

5087 / 2658 / 2350

Регистрация: 10.12.2014

Сообщений: 10,054

12.02.2015, 07:07

Сообщение было отмечено FREYfMI как решение

Решение

Pascal

var f0, f1, t : integer;
begin
  Write('t = ');ReadLn(t);
  f0:=1;f1:=1;while f1<=t do begin f1:=f1+f0;f0:=f1-f0;end;
  WriteLn(f1);
end.

	12.02.2015, 07:07

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

12.02.2015, 07:07

Помогаю со студенческими работами здесь

Найти первое простое число, больше заданного n
Напишите, пожалуйста программу: Найти первое простое число, больше заданного n

Найти первое число в последовательности Фибоначчи больше n
Последовательность Фибоначчи образуется так: первый и второй члены последовательности равны 1,...

Найти первое натуральное число, сумма делителей которого больше S
Найти первое натуральное число, сумма делителей которого больше S.

Оператор цикла while. Найти минимальне число, больше 300, которое нацело делится на 19
паскаль оператор цикла while напишите программу поиска минимального числа, большего 300, которое...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи
КуМир, исполнитель Чертежник: Решение задач bytestream 28.01.2025 КуМир — это образовательная среда для обучения программированию. Она предлагает пользователям разнообразные инструменты для разработки и отладки программ, что особенно ценно для студентов и. . .	Rust или Go? А может C++? hw_wired 28.01.2025 С каждой новой технологией или методологией появляются новые языки программирования, призванные решать конкретные задачи либо улучшать аспекты производительности и безопасности. Среди множества. . .	Fortran и WinAPI: как создать приложение с графическим интерфейсом hw_wired 28.01.2025 Fortran — это один из старейших высокоуровневых языков программирования, широко используемый в науке и инженерии уже несколько десятилетий. Его название происходит от "Formula Translation" (перевод. . .	Списки в Haskell hw_wired 28.01.2025 Haskell является функциональным языком программирования, который отличается лаконичностью синтаксиса и мощными абстракциями. Важным концептом в Haskell являются списки — упорядоченные коллекции. . .	Функции высшего порядка в Haskell hw_wired 28.01.2025 Haskell – это современный функциональный язык программирования, который получил широкое распространение благодаря своей выразительности и мощным абстракциям. Одной из ключевых особенностей Haskell. . .	Как в цикле обойти все поля объекта в JavaScript bytestream 28.01.2025 Объекты в JavaScript представляют собой фундаментальные структуры данных, которые позволяют хранить и организовывать связанную информацию в виде пар ключ-значение. Каждый объект можно представить как. . .
Как выбрать строки в DataFrame по значению столбца в Pandas bytestream 28.01.2025 В области анализа данных библиотека Pandas стала незаменимым инструментом для работы с табличными данными в Python. Эта мощная библиотека предоставляет множество функций для эффективной обработки и. . .	Как сделать перенос строки в Bash bytestream 28.01.2025 При работе с командной оболочкой Bash разработчики часто сталкиваются с необходимостью форматирования текстового вывода, где ключевую роль играет правильное управление переносами строк. Умение. . .	Поиск подстроки в строке с помощью Bash bytestream 28.01.2025 Поиск подстроки в строке является одной из важных задач в программировании и обработке текстов. Применение такого поиска можно найти в самых разных областях, от анализа данных до разработки. . .	[golang] 169. Majority Element alhaos 28.01.2025 Тут надо вернуть "мажористый" элемент который встречается в слайсе больше чем в половине случаев. По условиям задачи во входных данных такой элемент обязан присутствовать. / / . . .	Когда лучше использовать LinkedList вместо ArrayList в Java bytestream 28.01.2025 При разработке Java-приложений выбор правильной структуры данных играет ключевую роль в обеспечении эффективности и производительности программы. ArrayList и LinkedList являются двумя. . .	Какой ответ HTTP лучше использовать: 403 Forbidden или 401 Unauthorized, когда недостаточно прав bytestream 28.01.2025 В современной веб-разработке правильная обработка ошибок и точное информирование клиентов о статусе их запросов играют критическую роль в создании надежных и безопасных приложений. Особое внимание. . .

Наверх