Чему равно значение функции F(99)+F(100)? Pascal
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Ребзи свечку поставлю за вас☝
Автор: Yevsyukov1697
Найдите сумму всех натурвльных чисел из промежутка 1 , m
Автор: ooofishai4064
Чему будет равно значение ячейки c1, если = сумм ( a1 : a7)/2
Автор: fominovaVladislav1346
Запиши развёрнутую запись числа 0, 356 для дробной части числа. ответ: 0, 356 = -10 10 - 10 ответить
Автор: karpovaveronika196
107875178
Пример решения на языке PascalABC.NET:
function F (n:real):real;
begin
if n <=5 then result:=n*2 else
if (n>5) and (Frac(n/2) = 0) then result:=(F(n-2)+3*F(n/2)) else
if (n>5) and (Frac(n/2) <> 0) then result:=(F(n-1)+F(n-2)+F(n-3));
end;
begin
var D:=F(99)+F(100);
writeln('Результат вычислений: ',D);
end.