(pascal) определите значение переменной с после выполнения следующего фрагмента программы объяснить решение подобных программ на данном примере

Пока переменная i не будет больше 5, будет выполняться s:=s+i*(i+1);
i:=i+1; следовательно, считаем, и получается что переменная s будет равняться 41. переменная i в ходе выполнения менялась, каждый раз когда проходила запрос (i меньше 5?) она прибавляла единицу к i, значит если в первый раз i=1, то во второй раз, она будет равняться 2 и т.д.  и эти значения, в ходе которых менялось, подставляются вот сюда s:=s+i*(i+1);
i:=i+1;

если в кратце, то каждый раз программа прибавляла 1 к i,тем самым проверяя условие, и выполняла действие над s, подставляя в i соответствующие значение