Напишите программу и блок-схему а=1+3+5++(2n+1)/1*3*5**(2n+1)

Var a,b,c: real; n,i: integer; beginwrite('ввидите n='); readln(n); for i: =1 to n do b: =b+(2*n+1); c: =1; for i: =1 to n do c: =c*(2*n+1); a: =b/c; writeln('a=',a); end.

импликация  — бинарная логическая связка, по своему применению приближенная к союзам «если… то…».

импликация записывается как посылкаследствие; применяются также стрелки другой формы и направленные в другую сторону (остриё всегда указывает на следствие).

суждение, выражаемое импликацией, выражается также следующими способами:

посылка является условием, достаточным для выполнения следствия; следствие является условием, необходимым для истинности посылки.                        x={"студент сдаст хорошо сессию"} y={"папа купит ему машину"}. однако, это не совсем удачная иллюстрация, потому что как-то не близка к действительности. напомню, что x-> y == 0 только в том случае, если студент действительно хорошо сдал сессию, а папа машину ему не купил (наоборот, если студент сдал плохо, а папа купил ему машину, то папу лжецом уж точно не назовёшь).