Pascal
1) дан двумерный массив размером 5×6, заполненный случайными числами из интервала [-10; 10]. сформировать одномерный массив, каждый элемент которого равен произведению чётных положительных элементов соответствующего столбца.
2) дан двумерный массив размером n×m, заполненный случайным образом. определить, есть ли в данном массиве строка, в которой ровно два отрицательных элемента. если есть, то вывести номер этой строки.
3)заполнить массив 5×5 по правилу (см. фото): ​​

7

Объяснение:

k = 1        dat[1] = 12       12 > 12  (НЕТ)       m = 0

k = 2       dat[2] = 15      15 > 12  (ДА)         m = 1

k = 3       dat[3] = 17       17 > 12  (ДА)         m = 2

k = 4       dat[4] = 15       15 > 12  (ДА)        m = 3

k = 5       dat[5] = 14       14 > 12  (ДА)        m = 4

k = 6       dat[6] = 12       12 > 12  (НЕТ)      m = 4

k = 7       dat[7] = 10       10 > 12  (НЕТ)      m = 4

k = 8       dat[8] = 13       13 > 12  (ДА)        m = 5

k = 9       dat[9] = 14       14 > 12  (ДА)        m = 6

k = 10     dat[10] = 15       15 > 12  (ДА)        m = 7

Объяснение:

a = int(input())

b = int(input())

c = int(input())

p = (a+b+c)/2

if a <= 0 or b <= 0 or c <= 0:

   print("Неверные стороны треугольника")

elif (a+b) < c or (a+c) <  b or (c+b) < a:

   print("Неверные стороны треугольника")

else:

   s = (p*(p-a)*(p-b)(p-c))**0.5 # считаем площадь по трем сторонам

   print("Площадь: ", s)

   if a == b == c:

       print("Равносторонний треугольник")

   elif (a == b) or (a == c) or (b == c):

       print("Равнобедренный треугольник")

   else:

       print("Разносторонний треугольник")