найти произведение всех целых чисел от C до D
в паскале 

Это сумма, а не произведение

programm abc;var c,d,i,p:integer;beginread (c,d);p:=0;for i:=c to d dop:=p+i;writeln(p);end.

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017// Внимание! Если программа не работает, обновите версию!begin  var (c,d):=ReadInteger2('C,D=');  Writeln('П = ',Range(c,d).Aggregate(BigInteger(1),(i,j)->i*j))end.ПримерC,D= 23 42П = 1250004633476421848894668800000