составьте модель состава системы «предприятие» покажите подсистемы для части элементов построенной системы и Отобразите связи структурных единиц системы, можете использовать графический иди текстовой редактор если хотите( но укажите если использовали)
var t:real;
begin
t:=ArcTan(Sqrt(1-x*x)/x);
if x<0 then ArcCos:=t+Pi
else ArcCos:=t
end;
var
a,b,c,p,p2,s,alpha,beta,gamma,h:real;
begin
Read(a,b,p);
c:=p-a-b;
p2:=p/2;
s:=sqrt(p2*(p2-a)*(p2-b)*(p2-c));
alpha:=ArcCos((b*b+c*c-a*a)/(2*b*c));
beta:=ArcCos((a*a+c*c-b*b)/(2*a*c));
h:=a*Sin(beta);
alpha:=alpha*180/Pi;
beta:=beta*180/Pi;
gamma:=180-alpha-beta;
Writeln('c=',c);
Writeln('alpha=',alpha:0:2,', beta=',beta:0:2,', gamma=',gamma:0:2);
Writeln('S=',s,', h=',h)
end.
using namespace std;
int main(){ setlocale(LC_ALL, "RUSSIAN"); const int N = 10; int arr[N]; int K, L, sum = 0, sumexcl = 0; srand(time(NULL)); for (int i = 0; i < N; i++) { arr[i] = rand() % 10; sum += arr[i]; } cout << "Введите K >> "; cin >> K; cout << "Введите L >> "; cin >> L; for (int i = 0; i < N; i++) { cout << arr[i] << " "; if((i>=K) && (i<=L)) sumexcl += arr[i]; } sum -= sumexcl; cout << "Результат: " << sum << endl; system("pause");}