Масив. Створення, сума, пошук Lazarus

Який об'єкт використовують в програмі Lazarus для введення та виведення масиву?

Що знаходить дана програма?

procedure TForm1.Button1Click(Sender: TObject);

var a: array [1..10] of real; i: integer; s: real;

begin

 for i := 1 to 10 do

a[i] := StrToFloat(Memo1.Lines[i-1]);  

  s := 0;

 for i := 1 to 10 do s := s + a[i];

 Label1.Caption := FloatToStr(s);

end; 

Що знаходить дана програма?

procedure TForm1.Button1Click(Sender: TObject);

var a: array [1..10] of real; i: integer; к: integer;

begin

 for i := 1 to 10 do

a[i] := StrToFloat(Memo1.Lines[i-1]); 

  к := 0;

 for i := 1 to 10 do k := k + 1;

 Label1.Caption := IntToStr(k);

end; 

Що таке масив?

Які величини можна описати як масив? 

Яке значення буде присвоєно третьому елементу масиву в результаті виконання даної операції?

А[3]:=1;

A[3]:=A[3]+1;

Який опис масиву А вірний?

Як описати масив А з 25 цілих чисел? 

Елементи масиву А[1..6] мають значення 2; 5; 7; 8; 16; 13 відповідно.

Визначте, яких значень набудуть елементи масиву після виконання оператора

А[1] := А[3] + А[5]

Що виконує даний алгоритм

for i:=1 to N do

if A[i]<0 then A[i]:=25

Яке значення буде присвоєно третьому елементу масиву в результаті виконання даної операції?

А[1]:=5; A[2]:=6;

A[3]:=A[1]+2*A[2];