Написать программу , которая определяет количество четерехзначных чисел в ряди Фибоначчи.

Ответы

Ответ дал: BobbyFresnel
0

===== PascalANC.NET =====

begin

 SeqWhile(1, 1, (a, b) -> a + b, p -> p < 10000)

   .Count(p -> p.InRange(1000, 9999))

   .Println

end.

Приложения:

bertain: Можете, пожалуйста, помочь с заданиями: https://znanija.com/task/33609064 и
https://znanija.com/task/33609075 , буду очень благодарна! Оба на 100 баллов.
BobbyFresnel: Нет, не сделаю. Я уже пообещал тутошним модераторам не делать заданий по переводу между системами счисления, потому что они считают, что я не указывают неких важных подробностей перевода, ну а я с ними несогласен.
Вас заинтересует