Паскваль вычислите n чисел фибоначи: f1=1; f2=1; ; fn=fn-1+fn-2, например: f3=f2+f1=1+1=2,f4=2+1=3 b т.д.
bagfaver
2
12.03.2019 09:10
1
Другие вопросы по теме Информатика
h2000
12.12.2020 06:43
Leg1oner
12.12.2020 06:40
приветпока4
15.04.2020 12:53
janaljubche
15.04.2020 12:53
uhbujhxbr
01.09.2019 10:00
ДаРоВаНиЕ
20.04.2020 18:46
xastek
21.09.2019 00:50
Популярные вопросы
- Make up sentences about the great explorers using relative pronouns as in...
3 - Для контрольной работы учащимся предложили тест из 8 , кол-во верных ответов,полученных...
1 - На плоскости лежат четыре равных попарно касающихся шара радиуса r. основание...
1 - Acheetah is the animal (fast) a cobra is than a scorpion. (dangerous) a...
1 - Купили 5кг 600г сахара израсходовали 7\8 всего сахара сколько грамов сахара...
2 - Проиллюстрировать примерами (по одному предложению) разряды подчинительных...
2 - Анимация «избушки на курьих ножках» в qbasic...
1 - Использо цифр 04: 05 записали два разных три значных числа может ли произведение...
2 - Назовите основные хозяйственные и культурно- достижения цивилизации городов...
2 - Определите массу объема число частиц кальция с количеством вещества 0,1моль...
1
var n:longint;
function f(n:integer):longint;
begin
if (n=1)or(n=2) then f:=1 else
f:=f(n-1)+f(n-2);
end;
begin
write("Vvedite poziciu chisla: ");
read(n);
write("chislo ryada na dannoy pozicii ravno ",f(n));
end.