Числа Фибоначчи в Pascal
Вывести на экран ряд чисел Фибоначчи, состоящий из N элементов. Значение N вводится с клавиатуры.
Числа Фибоначчи — это элементы числовой последовательности 0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, …, в которой каждое последующее число равно сумме двух предыдущих.
Описание переменных:
- n — количество элементов ряда;
- a, b — значения двух последних элементов ряда;
- c — буферная (запасная) переменная;
- i — счетчик.
Алгоритм решения задачи:
- Получить значение n.
- Присвоить a и b значения 0 и 1 соответственно (это первые числа ряда Фибоначчи). Вывести их на экран.
- Начиная с 3-го элемента до n,
- выводить на экран сумму a и b,
- временно сохранить значение b в переменной c,
- записать в b сумму значений a и b,
- присвоить a значение с.
Программа на языке Паскаль:
var a, b, c, i, n: integer; begin write('n = '); readln(n); a := 0; write(a,' '); b := 1; write(b,' '); for i := 3 to n do begin write(a + b, ' '); c := b; b := a + b; a := c; end; writeln; end.
Примеры выполнения программы:
n = 10 0 1 1 2 3 5 8 13 21 34
n = 15 0 1 1 2 3 5 8 13 21 34 55 89 144 233 377