>>> 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()
const nmax[100];
var a,b:array of integer[1..nmax];
var i,j:integer;
begin
i=1;
while not eol do
begin
read(a[i]);
i++;
end;
readln();
j=1;
while not eol do
begin
read(a[j]);
j++;
end;
write(abs(j-i));
end.