Question

даны 2 целых числа а и в вывести в порядке возрастания все целые числа, располоденные между а и в (не включая сами числа а и в), а такде сумму этих чисел

Answer 1

Ответ:

Объяснение:

summa := 0;

for i:= a+1 to b-1 do

begin

 writheln(i);

 summa := summa+i;

end;

writeln (summa);