Найдите сумму чисел от a до b pascal
begin Range(ReadInteger, ReadInteger).Sum.Printlnend.
check comment ( pls delete )
сумму всех чисел от a до b
Ну... Или я что-то не правильно понял? Поясни..
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.
А. Ля. Так. Ладно, вы уже кинули ответ. Поэтому.