Ответ:
function f(n: integer): integer;
begin
if n>100 then f:=n-10
else f:=f(f(n+11))
end;
Вычислите f(99).
Объяснение:
f=91
В конце XIX века Герман Холлерит в Америке изобрел счетно-перфорационные машины. Он основал фирму по производству этих машин, которая затем была преобразована в фирму IBM.
Первоначально, люди использовали речь, для того чтобы предупредить об опасности.
Попробуйте такой вариант:
programm one
var n, i: integer;
S: real;
begin
readln(n);
while(i != n)
begin
s := s + 1/((2*n+1)*(2*n+1));
i = i+1;
end;
writeln(s);
readln();
end.