program SumNumbers;

var
sum, i: integer;

begin
sum := 0;

for i := 6 to 10 do
begin
sum := sum + i;
end;

writeln('Сумма чисел от 6 до 10: ', sum);
end.