Това изчисление логика факториел. Нека да го кача на език за програмиране Delphi-ТА. Цикъл Delphi прави, както следва:
След думата, която искате да зададете за всяка променлива първоначално ценности-комплект. Тази променлива се използва като контурният брояч.
След всяко изпълнение на действието, на брояча ще нараства по едно, докато променливата не надвишава крайната стойност. Като брояч, аз използвах да се използва променлива с име индекс или аз една, но някои експерти Сдз-стопяват и броячи трябва да се даде по-различни имена. По мое мнение, различно име не винаги е възможно да излезе с. Като цяло, цикълът е както следва:
В този пример декларира две променливи индекс и вид сума "число". На първо място, с променлива сума е настроена на 0. След това цикълът започва, където променливата на индекса се променя от 0 до 5. Сега погледнете фази, което се извършва тук.
- В първия етап индекс променлива е равна на 0. сума е равна на нула, а след това-пълна сума сделка: = о + о. Резултати сума = О;
- Във втория етап индекс се увеличава с 1, след което следват стъпки сумата: = а + 1. Резултати сума = 1.
- Тук индексът се увеличава с 1 и 2 вече е сбор = 1. След това следват действие Vie сума: = 1 + 2. Сума = 3 резултати.
- Тук индексът се увеличава с 1 и вече е равно на 3, сума = 3. Следователно, действието се изпълнява Wie сума: = 3 + 3. Резултати сума = б.
- Тук индексът се увеличава с 1 и вече е равно на 4, сбор = 6. Следователно, действието се изпълнява Wie-Сума: = 4 + 6. Резултати Сума = 10.
- Тук индексът се увеличава с 1 и вече е в размер на 5, сума = 10 Следователно изпълнен деи Следствие Сума: = 10 + 5. Резултати сума = 15.
Имайте предвид, че ние не се увеличи стойността на променливата индекса, като се използват специфични команди. Стойност увеличава автоматично, тъй като променливата е декларирана в насрещно цикъл за.
Нека да получите кода обсъдено по-горе директно в прог-мю, така че можем да видим това в реално оценени пример. Създаване на нова кандидатура. На мястото да формират две TLabel компонент, двукомпонентен и един бутон TEdit.
Edit1 компонент преименуван EndEdit, а Edit2 преименуван ResuitEdit. Сега, натиснете (манипулатор събитие # 111; nКликнете, за бутона, който се генерира, когато потребителят кликне върху бутона) са писане на код в обява:
По принцип, текстът е същият. Единствената разлика се състои в това, че цикълът се задейства от 0 до броя въведен в EndEdit компонент. EndEdit съдържа текст, и ние трябва да го превърне в брой, така че ние използваме функция strToint за преобразуване на низ в число. Тази функция работи по същия начин, както IntToStr, който обратно преобразуване на число в низ.
Получената превръщането се съхранява в EndCount:
След това цикълът се стартира, където променливата индекс се променя от 0 до EndCount стойността (в които броят влезе в EndEdit).
Стартирайте програмата и въведете крайната стойност на номера на реда 5. След това натиснете бутона и в даден запис трябва да се появи сред 15-те.
Трябва също така да се отбележи, че само едно действие ще бъде направена, след като в продължение на цикъла. Например, ако искате да изпълните две действия в един ред, трябва да ги приложат в скоби начало или край, както е показано в следния пример.
Тук на всяка стъпка от увеличения сума на цикъл по един. Ако се опитвате да се напише така:
линия ще работи само в съответствие сумата: = сума + индекс. Втората линия Sum: = сума + аз ще се изпълнява само в края на цикъла.
TIP. Ако не разбирате нещо в предишния пример, върнете се в главата, в която се описва схемата блок. Там е считана за пример, който работи като цикъл за. да. направя. Опитайте просто изготвя себе блок схема за този пример и психически мине през това стъпка по стъпка.
Помогнете на проекта! Кажи на приятел за този сайт:
Свързани статии