Даю 60 баллов!!! Составьте и запишите копьютерную программу на языке программирования Паскаль для решения следующей задачи: вычислить сумму всех натуральных чисел от заданного числа А до заданного пользователем числа В. С комментариями!!!

Вот код:var ababab,bababa,sususumamama:Integer;beginWriteLn('Перед вами программа для нахождения суммы всех натуральных чисел заданного диапазона');Write('Пожалуйста введите наименшее число диапазона ');ReadLn(ababab);Write('А теперь введите наибольшее число диапазона ');ReadLn(bababa);//оформляем ввод данныхsususumamama:=0;//присваиваем сумме значение 0while ababab<=bababa dobegin sususumamama:=sususumamama+ababab;//увеличиваем сумму на число а ababab:=ababab+1;//увеличиваем число а на 1end;Write('Сумма всех чисел диапазона равна '+sususumamama);//выводим сумму чиселend.