Цикл з лічильником

із лічильником описується оператором for...
For i := to

та кінцевого значень можуть бути:
Крок зміни циклу завжди однаковий і

Цілими
числами

Належати до деякого списку

або

Розділ 6 § 6.6

Наприклад:
Списком непарних чисел першого десятка
Списком голосних літер українського алфавіту
1,

‘а’, ‘о’, ‘у’, ‘е’, ‘и’, ‘і’, ‘ї’, ‘ю’

Список значень у мові програмування Lasurus обмежують круглими дужками

( )

Розділ 6 § 6.6

команди циклу з лічильником, у якому лічильник не збільшується на

For <ім'я змінно» := <вираз1> downto <вираз2> do
begin
<команди тіла циклу>
end;

(англ. down to - униз до).
Цей цикл продовжує виконуватися, якщо значення лічильника циклу більше або дорівнює (не менше) значенню вираз2.

разу.
For А := 10 То 0 Do S = S

Якщо при використанні форми То кінцеве значення параметра циклу менше за початкове, то цикл не виконається жодного разу.

Розділ 6 § 6.6

= 1х2хЗх...хn.
var i, n, f: Integer;
begin
n := StrToInt (Edit1.text);
f:=

Розділ 6 § 6.6

яких можуть бути як додатні, так і від'ємні числа. Знайти

var і, k: Integer; a, Sr: Double;
Begin
Sr := 0;
к := 0; // лічильник додатних чисел
For і := 1 to 5 do begin
а := StrToFloat(lnputBox('Bвести 5 чисел', IntToStr(i), '0'));
If a > 0 Then begin
к := к + 1; Sr := Sr + a;
end;
end;
Sr := Sr / k;
Edit1.text := FloatToStr(Sr);
end;

кілька рядків зручно скористатися компонентом ListBox (Список).
Компонент Listbox (вкладка Standard

Розділ 6 § 6.6

6 § 6.6

метод Add. Синтаксис його виклику такий:
ListBox1.Items.Add(‘Новий_рядок');
Додати до списку ListBox значення

ListBox1.ltems.Add (IntToStr (2 * х));

Розділ 6 § 6.6

викликають метод Clear:
ListBox1.Clear;
Властивість Count зберігає кількість рядків, доданих до списку.
Розділ

i, nv, kv: Char;
begin
nv := Edit1.Text[1];
kv := Edit2.Text[1];
For i :=

Розділ 6 § 6.6

не виконуватись жодного разу? Поясніть свою відповідь. Наведіть приклад.
Чи може

У чому полягають відмінності у виконанні основних алгоритмічних структур: слідування, розгалуження, цикл.

Розділ 6 § 6.6