Паскаль. написать программу, заполняющую массив из 10 элементов по следующему правилу: а(i) = (2*i – 1)/sin (i)

Var a:array[1..10] of real; 
i:integer; 
begin 
for i:=1 to 10 do begin 
a[i]:=(2*i-1)/sin(i) 
end; 
a.Println 
end.

A = [75, 31, 80, 40, 48, 40]  # любой список

# Готовые решения для этих задач:

print(sum(A))  # Сумма

# Произведение

A = [75, 31, 80, 40, 48, 40]

import functools

import operator  # содержит все возможные операции

print(functools.reduce(  # reduce - применить операцию ко всем элементам списка поочерёдно

       operator.mul,  #  операция умножения

       A))

# Через цикл

# Сумма

S = 0

for i in A: S += i  # Сложить все элементы A, результатом будет переменная S

print(S)

# Произведение

M = 1  # Если будет 0, то всё выражение тоже будет 0

for i in A: M *= i

# Можно также проверять наличие 0-я (для скорости, а можно этого и не делать, но так конечно круче, если например тебе нужно перемножить массив из миллиона элементов, а на конце 0 - бесполезное получиться перемножение).:

if 0 in A: M = 0

else: for i in A: M *= i

print(M)

A = [89, 87, 4, 6, 18, 77, 61, 6, 83, 23, 31, 22, 48, 23, 52]  # любой список

# Сумма:

S = 0

for i in A: S += i  # Сложить все элементы A, результатом будет переменная S

print(S)

# Произведение:

M = 1  # Если будет 0, то всё выражение тоже будет 0

for i in A: M *= i

# Или

if 0 in A: M = 0

else:

   for i in A: M *= i

print(M)

# Готовые решения для этих задач (Встроены в Python, использовать их будет разумно.):

# Сумма:

print(sum(A))

# Произведение

import functools

import operator  # содержит все возможные операции

print(functools.reduce(  # reduce - применить операцию ко всем элементам списка поочерёдно

      operator.mul,  #  операция умножения

      A))  # Использовать вариант выше (с проверкой на наличие 0-я, будет предпочтительнее).