Используя цикл for downto вычислить сумму чисел от 36 до 12. , , буду . не уверен в правильности своего решения.

Var i,sum:integer;
begin
sum:=0;
for i:=36 downto 12 do
sum:=sum+i;
writeln('Сумма всех целых чисел от 36 до 12 равна ',sum);
end.