Найдите сумму чисел от a до b pascal

a = 1, b = 5, Sum = 1 + 2 + 3 + 4 + 5

А. Понял. Оке. Сорян.

Заведите переменную Sum, вставьте цикл от a до b и просуммируйте

var a, b, Sum, i: integer;begin Read(a, b); Sum := 0; for i := a to b do Sum := Sum + i; Write(Sum)end.

А. Ля. Так. Ладно, вы уже кинули ответ. Поэтому.

check comment ( pls delete )