Var
S, tmp: real;
n, i: integer;
begin
write('Введите n:');
readln(n);
for i := 1 to n do
begin
tmp := 1 / ((2 * i + 1) * 3);
S := S + tmp;
end;
writeln(S:8:10);
readln;
end.
Человек, умеющий читать и писать, казался египтянам мудрецом потому, что образование в то время мало было развито. И тот человек, который умел читать и писать казался египтянам очень умным, так как в то время практически никто не умел делать это.
Всё сделано лично мной. Копирование запрещено©
F(n=5) = F(5-1)*(5+1) = F(4)*6;
F(n=4) = F(4-1)*(4+1) = F(3)*5;
F(n=3) = F(3-1)*(3+1) = F(2)*4;
F(n=2) = F(2-1)*(2+1) = F(1)*3;
F(n=1) = 1 ⇒ F(2) = F(1)*3 = 1*3 = 3
F(3) = F(2)*4 = 3*4 = 12
F(4) = F(3)*5 = 12*5 = 60
F(5) = F(4)*6 = 60*6 = <u><em>360
</em></u>
Ответ: 3
Объяснение: 8 бит = 1 байт
Если размер предложения в байтах (!) оказался на 5 больше, то название нового животного вместе с запятой и пробелом - 5 байт, а без запятой и пробела - 5-1-1 байт = 3 байта, значит длина слова - 3 символа.