Предмет: Информатика,
автор: КотЭюшка
Рекурсия. ПаскальABC. Составить программу для определения значения функции, заданной указанным соотношением.
Приложения:
Ответы
Автор ответа:
0
function f(x:integer):integer;
begin
if abs(x+1)<=1 then f:=4
else f:=-2*sqr(x)+sqr(f(x-1))
end;
begin
if abs(x+1)<=1 then f:=4
else f:=-2*sqr(x)+sqr(f(x-1))
end;
Автор ответа:
0
спасибо большое, у вас там ошибочка, нужно не умножить, а прибавить, но это опечатка)
Автор ответа:
0
Спасибо, я уже сам заметил и попрвил
Автор ответа:
0
Function F(x : Real) : Real;
Begin
If abs(x+1)>1 then F:=-2*sqr(x)+sqr(f(x-1))
else F:=4;
end;
Var a : Real;
Begin
Readln(a);
Writeln(F(a));
end.
Begin
If abs(x+1)>1 then F:=-2*sqr(x)+sqr(f(x-1))
else F:=4;
end;
Var a : Real;
Begin
Readln(a);
Writeln(F(a));
end.
Интересные вопросы
Предмет: Математика,
автор: irinaneibert43
Предмет: Литература,
автор: Sabonl
Предмет: Английский язык,
автор: Аноним
Предмет: Математика,
автор: Natsume581
Предмет: Математика,
автор: DachaSaharova