БбОоО зЗннААанНИяЯ тТеЛрААмм - @united brai nly (БЗ )

Реализация на VBA Excell
Если есть офис, то можете запустить программу.
Код увидеть Alt+F11

Sub massiv()   
строка = 3 'не обязательно,номер строки для начала вывода на лист   
n = Cells(2, 3) 'не обязательно, вводим количество чисел   
Dim B(10000) As Integer 'резервируем память на 10000 целых чисел   
S = 0 'обнуляем сумму   
For i = 1 To n 'Начало цикла       
   k = Rnd(1) 'Генерируем случайное число в диапазоне (0;1)       
   k = k * 9 + 12 'Смещаем его в диапазон [12;20]       
   k = Int(k) 'обрезаем, оставляя целое       
   B(i) = k 'заполняем массив       
   S = S + k 'считаем сумму       
   Cells(строка, 3) = строка - 2 'не обязательно, вывод номера значеня              
   Cells(строка, 4) = k 'Не обязательно вывод значения       
   строка = строка + 1 'не обязательно, увеличить строку для вывода   
Next i 'Конец цикла   
Cells(строка, 3) = "сумма =" 'не обязательно, выводим надпись   
Cells(строка, 4) = S 'не обязательно, выводим сумму
End Sub

Составим таблицу, и заполним её ячейки плюсами и минусами (запись "-2" обозначает "ставим минус в ячейку 2"):

1} С не знает перc: -2  

2} для М родной тур: +8

3} Ю не знает по-тур ни слова:  -16

4} М нужен переводчик, чтоб говорить с Ю, значит Ю не знает тур: -12

5} никого, кто владел бы одновременно и арм, и тур -> М не знает арм: -5

6} А говорит по-перс: +10

7} C переводчик между М и А, но А говорит по перс, значит М не знает перс: -6

8} второй язык М - греческий: +7

9} М и А нуждаются в переводчике, значит А не знает гре: -11

10} второй язык А - арм: +9

11} С переводил для А, значит он знает арм: +1

12} нет общего языка для С А Ю, значит Ю не знат арм: -13

13} Ю знает два языка - перс и гре: +14 +15

14} нет общего языка для С А Ю, значит С не знает гре: -3

15} второй язык С - тур: +4

Салал - армянский и турецкий

Мохаммед - греческий и турецкий

Абдулла - армянский и персидский

Юсуф - персидский и греческий