Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
romanenkoanna66
22.02.2022 19:45 •
Информатика
Напишите программу нахождения 10 чисел фибоначчи. паскаль
Показать ответ
Ответ:
2003nur
07.09.2020 18:55
Var
i,f, f0, f1: integer;
begin
f0 := 0;f1 := 1;
write(f0:4, f1:4);
for i := 1 to 8 do
begin
f := f1 + f0;
write(f:4);
f0 := f1;
f1 := f;
end;
end.
Тестовое решение:
0 1 1 2 3 5 8 13 21 34
0,0
(0 оценок)
Популярные вопросы: Информатика
DarkGay
18.05.2020 05:41
LMT Internet — это: папка файл или ярлык...
krskapoval
04.07.2020 00:35
Минимизировать функцию. (a+¬b+c)*(¬a+¬b+c)=?...
Anchoys777
16.03.2020 16:09
Вставите пропущенные буквы: 1. на __ __лке есть кн_г_. 2. н__ __олке нет __ __хм__т. 3. н__ __ __лке б__ль__е __ест__ __гру__ек....
DeltaMintz
23.07.2021 20:47
Дано n чисел. определить произведение четных по номеру чисел + блок-схему желательно...
viktoriya212
23.07.2021 20:47
Заполните таблицу в каждой строке которой одно и тоже число должно быть записано в системе счисления с основаниями 2 8 10 и 16...
dayanka13
14.01.2021 00:47
Табличний процесор - цеа)це прикладна програма, яка забезпечує автоматизацію створення, опрацювання, коригування, зберігання і друкування документів у формі таблицьб)комп...
yuyornevzkoxkdhd543
20.07.2021 03:00
Решить по информатике (дано-решение) : найти информационный объём растрового черно-белого (без оттенков серого) изображения, имеющего размер 128×128. ответ дайте в...
плртпломм
23.08.2020 01:20
ПАСКАЛЬ ИНФОРМАТИКА Составьте блок-схему алгоритма для решения следующей задачи. ( Pascal) Катет прямоугольного треугольника равен 5 см, а разность между гипотенузой...
shkolnik1233
16.08.2022 09:08
Здатність електричного заряду поділятися до найменшого значення називають ......
rafaelkhasanov
16.08.2022 09:08
Б. Найди и исправь ошибки. Отметкаоб ошибкеИсправленныйвариантПредложение:Снегурочка попросила у Весны любить.Весна отказала Снегурочке, посколькуэто грозило ей гибелью.Снегурочка...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,f, f0, f1: integer;
begin
f0 := 0;f1 := 1;
write(f0:4, f1:4);
for i := 1 to 8 do
begin
f := f1 + f0;
write(f:4);
f0 := f1;
f1 := f;
end;
end.
Тестовое решение:
0 1 1 2 3 5 8 13 21 34