Дан фрагмент программы:
Впишите пропущенные числовые значения элементов массива:

A[1]:=1; A[2]:=1;
for i:=3 to 7 do A[i]:=A[i-1]+ A[i-2];
A[1]=1; A[2]=1; A[3]=
; A[4]=
; A[5]=
; A[6]=
; A[7] =13

5 бит, т.к. 32=2 в пятой степени

емкость неформатированного диска больше информационной емкости доступной для записи данных, т.е. отформатированного диска.

var

x,y: real;

begin

readln(x);

y: =7*sin(x)*sin(x)-0.5*cos(x);

writeln(y);

end.

1)

s : = 0;

for i : = 1 to k do

begin

  if i mod 2 < > 0 then

      s: = s + i;

end;

2)

for i : = 5 to 55 do

begin

  if i mod 2 < > 0 then

      writeln(i);

end;

3)

s : = 1;

for i : = n to m do

begin

  s: = s * i;

end;

4)

s : = 0;

for i : = 10 to 15 do

begin

        s: = s + i;

end;

обрамления там везде одинаковые