Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Tokuz
13.11.2020 09:07 •
Информатика
Последовательность фибоначчи определяется так: a(0)=1, a(1)=1, a(k)=a(k-1)+a(k-2) при k> =2. дано n, вычислить a(n).
Показать ответ
Ответ:
Alinka2128
07.09.2020 16:26
Var a,b,i,n: integer;
begin
a := 1;
b := 1;
read(n);
for i := 2 to n do
begin
b := a + b;
a := b - a
end;
write(b)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
strukserzh
24.04.2020 19:46
❤сканируется цветное изображение размером 10 х 15 см. разрешающая сканера - 600 х 600 dpi, глубина цвета - 3 байта. какой информационный объём будет иметь полученный графический...
emalets20042
24.04.2020 19:46
Какое значение будет принимать переменная у после выполнения программы: var x, y: integer; begin y: =1 ; x: =15 repeat y: =y*x; x: =x-3 until x 5; writeln ( y= ,y); end x y y=y*x...
brussina5563
21.03.2022 05:15
Составить программу на Паскаль Найти корни уравнения ax2 + bx + c =0 (a 0) при условии D =0Составить программу и блок-схемуИмя программы КорниВывести на экран значения:Запрос:...
dashabur2005
08.10.2022 19:04
с заданием буду очень благодарен! Файл с задачей прикреплён ниже. (Без вирусов)...
Timpo
13.02.2020 05:03
10. Рассurайте объём информации в адресе вашей школы. 11. Какой объём информации содержится в выражении «Роль ком- пьютера в управлении экономикой республики велика»? 12. Выразите...
Kotova111111777
11.01.2020 09:25
В лыжном кроссе участвуют 265 спортсменов. Специальное устройство регистрирует прохождение каждым из участников промежуточного финиша, записывая его номер с использованием минимально...
Dinastita
25.12.2021 11:55
индивидуальный проект по информатике тема Мир без интернета нужно сделать теоретическую часть, кто сделает скину денежку на карту....
olya1234567890r
14.03.2021 15:30
Надо сделать теоретическую часть на тему Мир без интернета ...
Marcha7777777
06.09.2022 20:46
Решите : в 5 классе учатся 32 ученика из них 7 учеников написали контрольную работу по на 12 . какую часть учеников класса они составляют?...
верадубовая2007
06.09.2022 20:46
Написать оценку личности,маргарет тэтчер,или шарли де голль..8-10 предложений. нужно.....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
a := 1;
b := 1;
read(n);
for i := 2 to n do
begin
b := a + b;
a := b - a
end;
write(b)
end.