Там, где это возможно, следует путем равносильных математических преобразований упрощать вычисляемые выражения
1) w1:=exp(sin(i/j*pi/20)+ w1:=abs(sin(i*
cos(pi*(0.5+i/j/20))+ pi/6))+1;
ln(sqrt(sin(i*pi/6)*
*sin(i*pi/6))+1));
2) a:=sin(b*c)*sin(b*c); a:=sqr(sin(b*c));
В данном случае поисходит уменьшение времени вычисления, т.к. значение
sin(b*c) вычисляется один раз вместо двух, а затем возводится в квадрат с помощью стандартной функции языка.
