Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

В программе паскаль составить программу, выводящую на экран ряд чисел Фибоначчи. Фибоначчи

10-11 класс

чи

Elenmeri 15 апр. 2015 г., 7:56:04 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
лапка15
15 апр. 2015 г., 9:51:03 (9 лет назад)

Program Fibonacci;

Uses Crt;

var  i,n:integer;

 {Итерационный метод вычисления чисел Фибоначчи}

function fib_it(n:integer):integer;

var a,b,c,i:integer;

begin

     a:=1;b:=1;

     if (n=1) or (n=2) then  fib_it:=1

        else    begin

                        for i:=3 to n do 

                                begin

                                    c:=a+b;

                                     a:=b;  

 

                                      b:=c; 

                                end;      

 

                         fib_it:=c;

                    end;     

 

 end;

 

    

 

{main program}

begin

     clrscr;

 

     write('Введите n: ');

      readln(n);

 

      for i:=1 to n do write(fib_it(i),'   '); 

 

      readkey;

 

end. 

 

 

 

 

 

 

 

 

 

 

Ответить

Другие вопросы из категории

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Напишите программу, которая подсчитывает

количество элементов массива равных макс. среди двухзначных чисел. Если ни одного такого числа нет, нужно вывести сообщение об этом.

Читайте также

Написать программу, которая считает и выводит на экран сумму всех целых чисел из промежутка [A, B]. Числа A и B задает пользователь.

Программу реализовать с помощью трех циклических алгоритмов:
1) Цикл со счетчиком for
2) Цикл с предусловием while
3) Цикл с постусловием repeat
В программе предусмотреть ситуацию, когда пользователь вводит значение B ‹ A
Пример 1:
Пользователь вводит числа A=5, B=10. Сумма чисел: 5+6+7+8+9+10. Вывод на экран: 45
Пример 2:
Пользователь вводит числа A=7, B=4. Сумма чисел: 4+5+6+7. Вывод на экран: 22
Пример 3:
Пользователь вводит числа A=5, B=5. Сумма чисел: 5. Вывод на экран: 5

Помогите решить пожалуйста!!! Циклический оператор на ЯП Паскаль: Каждая бактерия делится на две в течение

одной минуты.

В начальный момент времени имеется одна бактерия.

Составьте программу, которая рассчитывает количество бактерий на заданное пользователем с клавиатуры целое значение момента времени (15 минут, 7 минут и т.п.)

СРОЧНО

Составьте программу, в которой функция выведет на экран однозначные числа, удовлетворяющие следующему условию: х*х*х-х*х=n , где n вводится с клавиатуры.

№1 Вывести на экран квадраты чисел от 1 до n. №2 Вывести на экран таблицу умножения от 1 до 10

числа n.

№3

Вычислить значение факториала n!

№4

В диапазоне от 1 до n вывести все четные числа на экран.

№5

Найти количество чисел, которые делятся на 3 и 5, из диапазона от 1 до n.



Вы находитесь на странице вопроса "В программе паскаль составить программу, выводящую на экран ряд чисел Фибоначчи. Фибоначчи", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.