Program zuevyuliya;
var a,sum,b:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
for a:=a to b do
inc(sum,a);
writeln('sum=',sum);
<span>end.</span>
Путь к файлу состоит из 2 частей разделенных точкой ( до точки ,также называют именем); Расширения (необязательная часть)
14, у меня это в олимпиаде попалось))))