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

Яким службовим словом в програмі позначається масив?

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

Встанови відповідність між способом введення даних і їх записом.

1. з клавіатури

2. через константу

3. випадковими числами

4. за формулою

а b[i]:=i*i+b[i];

б b[i]:=random;

в b:array [0..4] of real=(-2.5, 4, 85.2, 0,-6);

г b[i]:=StrToFloat(Memo1.Lines[i]);

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

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; x: real; f: boolean;

begin

 for i := 1 to 10 do a[i] := StrToFloat(Memo1.Lines[i-1]); 

 x := StrToFloat(Edit1.Text);

 f := false;

 for i := 1 to 10 do

 If a[i] = x

 Then begin   f := true;   break;  end;

 If f = true Then Label1.Caption = ‘Число є’

    Else Label1.Caption := ‘Числа немає’;

end;

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

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 := 1;

 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; s: real;

begin

 for i := 1 to 10 do

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

  s := 0;

 for i := 1 to 10 do if a[i] <0 then s := s + 1;

 Label1.Caption := FloatToStr(s);

end; 

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

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];

s:=s/10;

 Label1.Caption := FloatToStr(s);

end; 

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

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

Яка команда використовується при заповнені масиву випадковими дійсними числами від 0 до 1?