Генеруємо 10 випадкових дійсних чисел і знаходимо їх суму (вивести ці числа з 2 знаками після коми).
Генерируем 10 случайных чисел, и находим их сумму(вывести эти числа с 2 знаками после запятой).
P.S: Язык программирования не пишите всякий бред. В ответе напишите КОД программы.

Элементами множества "шрифты" являются семейства шрифтов различных гарнитур, таких как, Arial, Courier New, Times New Roman, Tahoma и т.д.

Среди гарнитур можно выделить два крупных типа: Serif и SanSerif. Серифы - это "засечки" на концах символов, составляющих конкретный шрифтовый набор. Большинство гарнитур к серифам, потому что считается бесспорным следующее утверждение: текст, имеющий "засечки", прочитывается быстрее, чем текст без засечек. Пример гарнитуры типа Serif - шрифты Times и Courier New, типа Sanserif (без засечек) - Arial и Tahoma (этот ответ набран гарнитурой Arial).

Шрифт может быть пропорциональным или моноширинным. В пропорциональном шрифте ширина каждого символа зависит от этого символа, например, буква Ж занимает по ширине больше места, чем Т. В моноширинном шрифте все символы одной ширины. Моноширинные шрифты приводят к увеличению длины набранных слов и поэтому имеют ограниченное применение. Представитель моноширинных шрифтов - Courier New.

Шрифты внутри одной гарнитуры могут отличаться размерами и начертанием. Типичные начертания, кроме обычных - это Italic (курсив) и Bold (выделенный),  а также их сочетание ItallicBold.

{Заполнить двумерный массив N x N случайными числами из интервала [-10 ; 10], выяснить что больше сумма элементов лежащих над главной диагональю или под главной диагональю.}const nmax = 20;var A:Array[1..nmax,1..nmax] of integer; n,m,i,j,sumN,sumV:integer;
beginwrite('Введите число n');readln(n);for i:=1 to n do beginfor j:=1 to n do beginm:= random(20)-10;A[i,j]:= m;write(A[i,j]:4);end;writeln;end;
writeln;writeln;for i:=1 to n do beginfor j:=1 to n do beginif i>j then begin write(A[i,j]:4);sumN:= sumN + A[i,j];end;end;writeln;end;
writeln;writeln;
for i:=1 to n do beginfor j:=1 to n do beginif i < j then begin write(A[i,j]:4);sumV:= sumV + A[i,j];end;
end;writeln;end;if sumN > sumV then write('Cумма элементов лежащих под главной диагональю больше')else write('Cумма элементов лежащих над главной диагональю больше');end.