#include <iostream>
<span>#include <iomanip>
</span><span>using namespace std;
</span>int main() {
<span> int n;
</span><span> cout<<"n = "; cin>>n;
</span><span> int a[n];
</span><span> cout<<"massiv: ";
</span><span> for (int i=0; i<n; i++) cin>>a[i];
</span><span>// по возрастанию
</span><span> for (int i=0; i<n-1; i++)
</span><span> for (int j=i+1; j<n; j++)
</span><span> if (a[j]<a[i]) swap(a[i],a[j]);
</span><span>// </span><span>вывод на экран
</span><span> for (int i=0; i<n; i++) cout<<a[i]<<" ";
</span><span> cout<<endl;
</span><span>// по убыванию
</span><span> for (int i=0; i<n-1; i++)
</span><span> for (int j=i+1; j<n; j++)
</span><span> if (a[j]>a[i]) swap(a[i],a[j]);
</span><span>// вывод на экран
</span><span> for (int i=0; i<n; i++) cout<<a[i]<<" ";
</span><span> cout<<endl;
</span><span> system("pause");
</span><span> return 0;
</span><span>}
</span>
Подключить модуль Graph, задать начальную точку, длинну по вертикали и горизантали. Ну там еще цвета назначить
Program primer;
var a,b:integher;
begin
writeln('vvedite a,b:=');
readln(a,b);
if (a<0) and (b<0) then writelln('yes') else writeln('no');
readln;
end
1) M:=2*Tan(v*v*v)+Sqrt((2*Exp(a)*v+Sin(2*v*v))/Cos(v*v))
2) Y:=Ln(3*k)-Sin(x*x)*Cos(x*x)+Sqrt(Sin(2*x)+Cos(2*x))
3)
Var
P,x:real;
Begin
Write('x = ');ReadLn(x);
P:=Abs(x+5)/(Abs(3*x*x-x+20)+9);
WriteLn('P = ',P);
End.
4)
Var
c,x,Y:real;
Begin
Write('x = ');
ReadLn(x);
Write('c = ');
ReadLn(c);
Y:=c*x;
if Y <= 9 then Y:=c*x+2
else if Y < 20 then Y:=c*c+x
else Y:=c-x;
WriteLn('Y = ',Y);
End.