program for7;
var A, B, i, S: integer;
begin
read(A, B);
S := 0;
for i := A to B
do S := S + i;
write( 'Сумма - ', S);
end.
program for7;
var A, B, i, S: integer;
begin
read(A, B);
S := 0;
for i := A to B
do S := S + i;
write( 'Сумма - ', S);
end.