Во время каникул весёлые человечки

Microsoft QBasic 1.0

DIM x AS INTEGER, y AS INTEGER
CLS
INPUT "X=", x
INPUT "Y=", y
REDIM C(1 TO x, 1 TO y) AS INTEGER
REDIM k(1 TO y) AS INTEGER
REDIM a(1 TO y) AS DOUBLE
RANDOMIZE TIMER
PRINT "M A T R I X   C"
FOR i = 1 TO x
   k(i) = 0: a(i) = 0
   FOR j = 1 TO y
      C(i, j) = INT(50 * RND + 10)
      PRINT USING "###"; C(i, j);
      IF C(i, j) MOD 7 = 0 THEN
         k(i) = k(i) + 1
         a(i) = a(i) + C(i, j)
      END IF
   NEXT j
   PRINT
NEXT i
PRINT
FOR i = 1 TO y
   PRINT USING "###"; k(i);
NEXT i
PRINT " - Количество"
PRINT "Средние"
FOR i = 1 TO y
   IF k(i) <> 0 THEN
      a(i) = a(i) / k(i)
      PRINT a(i)
   ELSE
      PRINT "Infinity"
   END IF
NEXT i

Пример работы программы
X=6
Y=9
M A T R I X   C
 38 40 31 33 31 22 54 16 43
 23 56 11 19 18 11 34 47 13
 59 59 26 23 54 15 53 20 33
 28 24 39 46 42 37 47 45 41
 20 25 39 35 16 13 12 17 27
 17 49 22 29 28 29 52 40 55

  0  1  0  2  1  2  0  0  0 - Количество
Средние
Infinity
 56
Infinity
 35
 35
 38.5
Infinity
Infinity
Infinity

data = [

   ['Ухмыляюсь', 2.26, 1.02, 87.3],

   ['Сияю от радости', 19.1, 1.69, 150.0],

   ['Катаюсь от смеха', 25.6, 0.774, 0.0],

   ['Слёзы радости', 233.0, 7.31, 2270.0],

   ['Подмигиваю', 15.2, 2.36, 264.0],

   ['Счастлив', 22.7, 4.26, 565.0],

   ['Глаза-сердца', 64.6, 11.2, 834.0],

   ['Целую', 87.5, 5.13, 432.0],

   ['Задумчивость', 6.81, 0.636, 0.0],

   ['Равнодушие', 6.0, 0.236, 478.0],

   ['Солнечные очки', 4.72, 3.93, 198.0],

   ['Громко плачу', 24.7, 1.35, 654.0],

   ['След от поцелуя', 21.7, 2.87, 98.7],

   ['Два сердца', 10.0, 5.69, 445.0],

   ['Сердце', 118.0, 26.0, 1080.0],

   ['Червы', 3.31, 1.82, 697.0],

   ['Класс', 23.1, 3.75, 227.0],

   ['Пожимаю плечами', 1.74, 0.11, 0.0],

   ['Огонь', 4.5, 2.49, 150.0],

   ['Переработка', 0.0333, 0.056, 932.0]

]

sum_emojixpress = 0

sum_instagram = 0

sum_twitter = 0

for row in data:

   sum_emojixpress += row[1]

emojixpress_mean = sum_emojixpress / len(data)

for row in data:

   sum_instagram += row[2]

instagram_mean = sum_instagram / len(data)

for row in data:

   sum_twitter += row[3]

twitter_mean = sum_twitter / len(data)

print('Среднее для EmojiXpress: {:.2f}'.format(emojixpress_mean))

print('Среднее для Instagram: {:.2f}'.format(instagram_mean))

print('Среднее для Твиттера: {:.2f}'.format(twitter_mean))

Объяснение:

объяснение в ответе