Регистрация
vysocskij1961
07.07.2020 14:28
Информатика
Есть ответ 👍

Последовательность фибоначчи образуется так: первый и второй члены последовательности равны 1, каждый следующий равен сумме двух предыдущих (1, 1, 2, 3, 5, 8, 13, найти сумму всех чисел в последовательности фибоначчи, которые не превосходят 1000

119
336
Посмотреть ответы 2

Ответы на вопрос:

ЛизаЕ
ЛизаЕ
4,8(5 оценок)
Var a,a1,a2: integer; begin a1: =1;           while(a< 1000) do begin     a: =a1+a2; a2: =a1; a1: =a;   writeln(a)    end; end.получились числа: 1  2  3  5  8  13  21  34  55  89  144  233  377  610  987
kelyansky
kelyansky
4,7(3 оценок)
Program chislo_bolse;
var a:integer;
begin

writeln(‘введите число’); read(a);
a:=a*10;
writeln(a);
end.

Популярно: Информатика