var z1,z2:Real; a:Integer; Begin Read(a); z1:=1/4-1/4*sin(5/2*pi-(8*a)); z2:=(1-sqr(sin(a))/(1 sqr(sin(a)); Writeln('z1 = ',z1); Writeln('z2 = ',z2); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.