Прошу ! нужно написать программу для решения следующей : вычислить количество элементов числовой последовательности а, удовлетворяющих условию -0, 2< =sin ai < =0, 5, i=1, n
Var a,b,c,r,s,p: real; begin write('длины сторон треугольника a,b,c через пробел: '); readln(a,b,c); write('радиус круга r: '); readln(r); p: =(a+b+c)/2; s: =sqrt(p*(p-a)*(p-b)*(p-c)); if r> =(a*b*c)/(4*s) then writeln('можно поместить') else writeln('нельзя поместить'); end.длины сторон треугольника a,b,c через пробел: 3 4 5 радиус круга r: 2.49 нельзя поместитьдлины сторон треугольника a,b,c через пробел: 3 4 5 радиус круга r: 2.5 можно поместить
Прошу ! нужно написать программу для решения следующей : вычислить количество элементов числовой последовательности а, удовлетворяющих условию -0, 2< =sin ai < =0, 5, i=1, n