universal21vek116
?>

Чему равно значение функции F(99)+F(100)? Pascal

Информатика

Ответы

ksuhova

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.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Чему равно значение функции F(99)+F(100)? Pascal
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

vapebroshop
andreanikin
margarita25061961
Галина-Юлия1292
denbelousov963
Mexx9050
Vos-sv
ЮлияДаниил520
kabinet17
alenchik19938823
Sergei_Olga658
Яковчук1911
Некрасов Валентина1097
Марина1101
kristina1989