В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История

Совсем недавно в Мытищинской Школе программистов было учреждено отделение для биологов. Разумеется, биологам очень неудобно работать в обычных компьютерных классах, поэтому они выбрали наименее занятый кабинет и организовали там инкубатор для новых штаммов микроорганизмов. За долгие годы в кабинетах МШП сформировалась своя уникальная экосистема, которая уже включает в себя определенное количество видов. Биологам известно, что в первый год нашей эры на месте, где через два тысячелетия будет стоять школа №26, уже существовало N штаммов микроорганизмов, а в каждый следующий год их количество увеличивалось ещё в N раз. Руководство хотело бы знать, сколько штаммов микроорганизмов обитает в кабинетах МШП на данный момент. Но поскольку ответ на эту задачу очень велик (N2019), то найдите хотя бы последнюю цифру в записи этого числа. Формат входных данных

В первой строке вводится N — натуральное число, не превосходящее 109.

Формат выходных данных

Требуется вывести последнюю цифру числа N 2019.

входные данныевыходные данные165406341 1 999923 7​

Показать ответ
Ответ:
Nikita45Nikita45
Nikita45Nikita45
04.10.2021 12:23

program FibonachiNums;

function FibN(n: integer): BigInteger;

begin

 var (f1, f2) := (BigInteger(1), BigInteger(1));

 for var i := 3 to n do

   (f1, f2) := (f2, f1 + f2);

 result := f2;

end;

function FibSumN(n: integer): BigInteger;

begin

 var (f1, f2) := (BigInteger(1), BigInteger(1));

 var Sum: BigInteger;

 

 if n = 0 then Sum := 0

 else Sum := 1;

 

 for var i := 2 to n do

 begin

   (f1, f2) := (f2, f1 + f2);

   Sum += f1;

 end;

 

 result := Sum

end;

begin

 Println('десятое число Фибоначчи:',FibN(10));

 

 var n := 100;

 Writeln($'{n}-е число Фибоначчи: ',FibN(n));

 

 Println($'Сумма первых {n} чисел Фибоначчи:',FibSumN(n))

 

end.

0,0(0 оценок)
Ответ:
нвчббисмт
нвчббисмт
31.12.2021 08:35

Собирается-журналист опрашивает людей для статьи

Обрабатывается-ученик решает задачу

Упрощается-учитель объясняет материал 

Создается-все тот же журналист придумывает статью

Запоминается-парнеь запоминает номер телефона девушки

Измеряется-программист рассчитывает сколько бит займет программа

Копируется-ученик списывает у одноклассника

Передается-две девушки обмениваются новостями

Принимается-ученики слушают учителя на уроке

Разрушается-придуманная выше указанным журналистом статья опровергается...

Делится на части-человек разбирает сообщение в котором пропущены пробелы

Ищется-человек ищет материал для доклада в интернете

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота