составте алгоритм для вычисления суммы 100 чисел

пожалуйста

вот всё

если захочешь изменить промежуток чисел ну не от 1 до 100 а допустим от 1 до 200 изменяй строку for a:=1 to 100 do

спасибо