Дан фрагмент программы:
Впишите пропущенные числовые значения элементов массива:
А[1]:=1; A[2]:=1;
for i:=3 to 7 do A[i]:=A[ i-1]+ A[i-21;
А очень

если переменная нужна целая то так:

x: =random(b-a)+a

если можно дробную, то так

x: =(b-a)*random+a

3^i = 18

i = 3

ответ. 3 лампочки.

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

begin s : = 0; for i : = 1 to 10 do begin for j : = 1 to 10 do begin a[i, j] : = random(20) + 1; write(a[i, j]: 3); if (j = 2) and (a[i, j] > 10) then s : = s + a[i, j]; end; writeln; end; writeln('сумма элементов 2го столбца больших 10 равна', s); end.

(12-3): (4+5)=1

1х2х3-4+5-6=1

(12: 3+4+5): (6+7)=1

(1+2-3+4+5+6-7): 8=1