Сумма чисел от m до n, Решить циклом с параметром и пост условием Опции

[ЮморисТ]

ЗДравствуйте помогите пожалуйсто с задачей)

Найти сумму чисел от m до n. Написать программу с помощью цикла с параметром ( for to do) и циклом с пост условием (repeat until)

Спасибо если кто поможет)

[Ozzя]

sum:=0;
for i:=m to n do
  sum:=sum+i;

[ЮморисТ]

Спасибо большое незнаеш как с пост условием сделать?

[Ozzя]

sum:=0;
i:=m;
repeat
  sum:=sum+i;
  i:=i+1;
until i>n; 

[ЮморисТ]

Огромная благодарность Ozzя!
p.s. тему можно закрыть.