Ответы
Ответ дал:
0
===== PascalANC.NET =====
begin
SeqWhile(1, 1, (a, b) -> a + b, p -> p < 10000)
.Count(p -> p.InRange(1000, 9999))
.Println
end.
Приложения:
Нет, не сделаю. Я уже пообещал тутошним модераторам не делать заданий по переводу между системами счисления, потому что они считают, что я не указывают неких важных подробностей перевода, ну а я с ними несогласен.
Вас заинтересует
1 год назад
1 год назад
1 год назад
3 года назад
8 лет назад
8 лет назад
https://znanija.com/task/33609075 , буду очень благодарна! Оба на 100 баллов.