Условие:
Даны 2 массива Xi , Yi , где i =1,2,3,…,10

Найдите сумму квадратов всех положительных элементов массива X.

Даны 2 массива Xi , Yi , где i =1,2,3,…,10

Найдите сумму квадратов всех положительных элементов массива X.
Блок-схема:

Программа:
Sub lab()
Const N = 10
Dim I As Integer
Dim S As S...