Даю 28 баллов.
Составить программу ( Pascal ) и блок схему для нахождения суммы по следующей формуле:
Формула в приложении

#Python 3.5.2s = 0.0; b = int(input("b = "))for x in range(3, 19+1): s+=(4*x)/(b*x);print ("S =", s)//FPC 2.6.4vari1, i2, x: integer;b, s: real;begins:=0;write ('B = '); readln (b);i1:=3; i2:=19;for x:=i1 to i2 do s:=s+(4*x)/(b*x);write ('S = ', s);end.