2. Вычислить сумму конечного ряда

, т.е. сумму первых n членов

последовательности (k=1,2,3..,n).

Программа, реализующая данный алгоритм будет иметь вид:

Замечание. В том случае, если тело цикла состоит только из одной инструкции, нет смысла использовать составной оператор (операторные скобки Begin…End)

Операторы циклов с условием

Синтаксис цикла с предусловием While

−Инструкции, находящиеся между begin и end выполняются до тех пор, пока условие истинно. Если условие неверно при входе в цикл, инструкции ни разу не исполняются.

−Чтобы цикл завершился, необходимо, чтобы последовательность инструкций между begin и end изменяла значения переменных, входящих в выражение условие.

Пример. Подсчитать количество цифр в заданном целом числе.

Программа, реализующая данный алгоритм будет иметь вид:

Замечание. В том случае, если тело цикла состоит только из одной инструкции, нет смысла использовать составной оператор (операторные скобки Begin…End)

Синтаксис цикла с постусловием Repeat … Until

Работа оператора:

−выполняются инструкции, следующие после ключевого слова Repeat;

−вычисляется значение условия. Если условие ложно, то повторно выполняются инструкции цикла. Если условие истинно, то выполнение цикла прекращается.

Замечание. При использовании цикла с постусловием нет необходимости использовать операторные скобки.

Пример. Вычислить сумму бесконечного ряда										с заданной точностью Eps,

(т.е. вычислить сумму всех членов последовательности , не меньших заданного

числа Eps).

Программа, реализующая данный алгоритм будет иметь вид:

Некоторые свойства визуальных компонентов.

Компонент Memo (многострочное окно редактирования) . Используется для ввода, отображения и редактирования многострочных текстов. Относится к группе Standard.

Alignment	Задает режим выравнивания текста внутри Memo.
AutoSize	Задает необходимость изменения размера компонента при изменении
	размера шрифта.
BorderStyle	Задается стиль обрамления Memo.
Color	Задает цвет, которым изображается элемент Memo на экране.
Lines	Определяет текст, который будет выведен построчно в окне Memo при
	запуске программы. Текст задается в окне String List Editor
MaxLength	Позволяет ограничивать число вводимых пользователем символов.
ScrollBars	Задает наличие полос прокрутки.
Text	Используется, чтобы получить текст компонента Memo как одну строку.
	Значение этого свойства не отображается в окне Object Inspector, к нему
	можно обратиться только во время выполнения программы.

Пример использования в программе

1.Заполнение Memo с использованием свойства Text на примере табулирования функции.

2. Тот же пример, но Memo заполняется с использованием свойства Lines. Метод Add, примененный к Lines позволяет добавить строку в Memo. Оператор memo1.Lienes[0]:=’ x | y ’; задает первую строку в Memo .