Запишите функцию для получения случайного x из указанного промежутка[0; , 15)[0; 15][-15; 15)[10; 15)​

Содержит программное обеспечение, достаточное для получения рабочей системы, включая текстовый редактор и основные коммуникационные программы. ap различные приложения, для работы которых не требуется система x window. d инструменты для разработки программ. компиляторы, отладчики, интерпретаторы и страницы руководства. e текстовый редактор emacs от gnu. f документы faq, howto и другая разнообразная документация. gnome среда рабочего стола gnome. k исходный код ядра linux. kde среда рабочего стола kde (k desktop environment). графическая среда с оформлением и внешнем виде в стиле macos и windows. в этой категорию также входит библиотека qt, необходимая для работы kde. kdei пакеты с локализацией настольной среды kde. l библиотеки. динамически подключаемые библиотеки, необходимые для работы многих программ. n сетевые программы. демоны, почтовые клиенты, telnet, клиенты чтения новостей и т.п. t система форматирования документов tetex. tcl язык tcl (tool command language). tk, tclx и tkdesk. x базовый комплект для системы x window. xap графические приложения, не являющиеся частью больших настольных сред (например, ghostscript и netscape).

1. "школьный" вариант (так учат в школах) //pascalabc.net 3.0, сборка 1064 const   n=15; var   c: array[1..n] of integer;   i,k: integer;   sn,ap: longint; begin   randomize;   writeln('исходный массив');   k: =0;   for i: =1 to n do begin       c[i]: =random(51)-25;       write(c[i]: 4);       if c[i]< 0 then sn: =sn+c[i]       else           if c[i]> 0 then begin ap: =ap+c[i]; inc(k) end   end;   writeln;   writeln('сумма отрицательных элементов равна ',sn);   writeln('среднее арифметическое положительных элементов равно ',ap/k) end. тестовое решение: исходный массив   22  15  -5    4    7  -6  24  23 -25 -21 -10  21 -11  -4  22 сумма отрицательных элементов равна -82 среднее арифметическое положительных элементов равно 17.25 2. современный вариант (а так в школах почему-то не учат) //pascalabc.net 3.0, сборка 1064 begin   var c: =seqrandom(15,-25,25);   writeln('исходный массив'); println(c);   writeln('сумма отрицательных элементов равна ',c.where(x-> x< 0).sum);   writeln('среднее арифметическое положительных элементов равно ',       c.where(x-> x> 0).average) end. тестовое решение: исходный массив [21,13,16,-6,-5,-21,-23,10,14,5,-14,7,-10,-9,9] сумма отрицательных элементов равна -120 среднее арифметическое положительных элементов равно 12.125