Question

Есть два Edit. Допустим, 1 и 5. Нужно посчитать сумму всех чисел, что между ними и вывести в Label.

Answer 1

На форму кидаешь кнопку ( Button )

Кликаешь по ней два раза, открывается код с процедурой ButtonClick
Между begin и end пишешь код

Label1.Caption:=inttostr(strtoint(Edit1.Text)+strtoint(Edit2.Text));

Вроде так, если нигде не ошибся)

Answer 2

потом begin

Answer 3

for i:=strtoint(Edit1.Text) to strtoint(Edit2.Text) do

Answer 4

summa:=summa+i;

Answer 5

Label1.Caption:=inttostr(summa);

Answer 6

end;