№1 var x,y:real; begin read(x); y:=(x/(exp(3*ln(x)) 16))-2*exp(6*ln(x)); writeln(y); end. №2 Var a:integer; begin read(a); if (a>0) then a:=a 1; if (a<0) then a:=a-2; if (a=0) then a:=10; writeln(a); end. №3 var a:integer; b:real; begin read(a,b); if (a=1) then b:=b; if (a=2) then b:=b*10000; if (a=3) then b:=b*10; if (a=4) then b:=b/100; if (a=5) then b:=b/10; writeln(b); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.