Складання та реалізація алгоритмів із циклом із лічильником у середовищі

лічильником у середовищі програмування

визначену кількість разів, використовують оператор циклу з лічильником.
Розділ 6 §

Заголовок циклу

Параметр циклу

Тіло циклу

із лічильником описується оператором for...
Розділ 6 § 25
For i

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

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

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

або

Наприклад:
Розділ 6 § 25
Списком непарних чисел першого десятка
Списком голосних

1, 3, 5, 7, 9

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

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

( )

ніж з однієї команди, як і в циклі з передумовою,

Розділ 6 § 25

begin

end

алгоритмом:
Розділ 6 § 25

оператора циклу while, в операторі циклу з лічильником зміна значення

Розділ 6 § 25

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

Розділ 6 § 25

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

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 § 25

6 § 25

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

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

Розділ 6 § 25

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

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

Розділ 6 § 25