5примеров непрерывной и дискретной заранее

Непрерывная: человеческая речь, живая музыка дискретная: чтение книги, газеты 

Type   v=array[1..11] of integer; function firstnegative(a: v; n: integer): integer; var   i: integer; begin   i: =0;   result: =0;   repeat       i: =i+1;       if a[i]< 0 then result: =i   until (result> 0) or (i> n) end; const   m=8;   n=11; var   a,b: v;   i,p,q: integer; begin   randomize;   for i: =1 to m do a[i]: =random(100)-50;   for i: =1 to n do b[i]: =random(100)-50;   p: =firstnegative(a,m);   q: =firstnegative(b,n);   writeln('массив а');   for i: =1 to m do write(a[i]: 5);   writeln;   writeln('массив b');   for i: =1 to n do write(b[i]: 5);   writeln;   if p< =q then writeln('номер первого отрицательного элемента в массива а: ',p)   else writeln('номер первого отрицательного элемента в массива b: ',q) end. тестовый прогон: массив а     37    14  -25    32    30  -29    38    27 массив b     33  -36    23  -17    -3  -16  -33    33  -48  -39    30 номер первого отрицательного элемента в массива b: 2