Написать программку: Распечатать числа Фибоначчи от 1 доN (каждое число в

Написать программку: Распечатать числа Фибоначчи от 1 доN (каждое число в последовательности, начиная с третьего, получается сложением двух прошлых чисел. К примеру: 1,1,2,3,5,8,13,21 )

Задать свой вопрос
1 ответ
Program zadacha_1;
nbsp;var
nbsp;a,b,c,n, i:integer;
begin
nbsp;writeln(Введите число n);
nbsp;readln(n);
nbsp;a:=1;
nbsp;b:=1;
writeln (a,b);
nbsp;i:=3;
nbsp;repeat
nbsp;c:=a+b;
nbsp;writeln( c);
a:=b;
b:=c;
i:=i+1
until igt;n;
nbsp;readln;
nbsp;end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт