Ответ:
Код ниже
Объяснение:
with open(r"D:\num.txt", "r", encoding='utf-8') as source:
sum = 0
item = 0
for s in source:
sum += int(s)
item += 1
with open(r"D:\result.txt", "w", encoding='utf-8') as dest:
dest.write(str(sum / item))
MASS[1..7]-7 чисел.
col-количество отрицательных чисел.
sum-сумма всех отрицательных элементов
pr-произведение положительных
Program abc;
const
<span> n = 10;
</span>var
<span> m: array [1..n] of integer;
</span><span> i: integer;
</span>begin
<span> for i := 1 to n do
</span><span> begin</span><span> m[i] := sqr(i) - 1;
</span><span> writeln(m[i]);</span><span>
end;
</span><span>end.</span>
54 _7+x=320_5
39_10+x=85_10
x=85-39=46
46_10=144_6