// PascalABC.NET 3.0, сборка 1128 begin var n:=40; var a:=ArrRandomReal(n,0,20); // интервал (0;20) var x:=ArrRandomReal(n,15,25); // интервал (15;25) for var i:=0 to n-1 do WriteLnFormat('x={0,6:N3} a={1,6:N3} z={2,8:N6}', x[i],a[i],sqrt((x[i]+a[i])/2)) end.
>>> import sys
>>> print(sys.stdin.readline())
>>> def progression():
print('Введите первое число прогрессии:')
a = float(sys.stdin.readline())
print('Введите разность прогрессии:')
b = float(sys.stdin.readline())
print('Введите число членов прогрессии:')
c = float(sys.stdin.readline())
k = ((2 * a + b * (c - 1)) / 2) * c
print(k)
Надо запускать введя progression()
>>> progression()