надо сделать в Excel, суда прислать скриншот таблицы, ещё в таблице должно быть минимум 6 человек записанно.​

PascalABC

Объяснение:

1)

begin

   WriteLn('Введите размер массива N: ');

   var n := ReadInteger;;

   var a := ArrRandomInteger(n, -20, 20);

   a.PrintLn;

   WriteLn('Сумма элементов, которые оканчиваются на число 2, равна ', a.Where(x -> (x mod 10 = 2) or (x mod 10 = -2)).Sum);

end.

2)

begin

   var a := ArrRandomInteger(10, -10, 10);

   a.PrintLn;

   WriteLn('Индексы отрицательных нечетных элементов:');

   foreach var i in a.Indices do

     if (a[i].IsOdd) and (a[i] < 0) then Write(i, ', ');

end.

import math

a = [float(input("Input x: ")), float(input("Input y: "))]

print(a)

x = a[0]

y = a[1]

y1 = x-1

if abs(x)<=1:

   y2 = math.sqrt(1-x**2)

if x>=0 and y>=y1 and y<=1:

   print("Yes")

elif x>=0 and x<=1 and y<y1 and abs(y)<=y2:

   print("Yes")

else:

   print("No")

a = [float(input("Input x: ")), float(input("Input y: "))]

print(a)

x = a[0]

y = a[1]

if abs(x)<=1:

   y2 = math.sqrt(1-x**2)

if abs(x)<=1 and abs(y)<=y2:

   print("Yes")

elif x>=0 and x<=1 and y>=0 and y<=1:

   print("Yes")

else:

   print("No")

Объяснение: