сумма арифметической прогрессии. (1+99)/2*((99-1)/(3-1)+1)=2500 Конкретно для суммы первых N нечетных - N^2 - количество по формуле арифметической прогрессии ((99-1)/(3-1)+1) - вторая часть верхней формулы = 50. 50^2=50*50=2500. Что из этого перевести в Delphi?