Используя графические средства, составьте и начертите модель системы «Предприятие». Покажите подсистемы для части элементов построенной системы. Отобразите связи структурных единиц системы. Для решения можно использовать графический или текстовый редактор

мальчик с пальчик, карлик нос,буратино,карабас барабас,змей горыныч, царевна лягушка,

(1+1/sqr((12*x), если без игрика, а как игрик впихнуть не могу

var a,b,c,d,e: real;

begin

  read(a,b,c,d);

  e: =(a+b+c+d)/4;

  writeln(e: 0: 4);

end.

program ms; uses crt; var a: array [1..10] of integer; l,k,s,i: longint; beginclrscr; writeln('введите 10 элементов массива'); for i: =1 to 10 dobegin    readln(a[i]);     if a[i]< 0 then l: =l+a[i];     if a[i]> 0 then k: =k+a[i]; end; s: =l*k; writeln(s); readkey; end.