Информатика люди дорогие

ответ:17

Більше за 17 не може бути бо немає стільки доріг)

Вотличии от блок-схемы, в программе использовано формирование членов последовательности посредством генератора случайных чисел. если нужен ввод с клавиатуры, достаточно удалить randomize и заменить строку t: =random(19)-9; { случайное значение на [-9; 9] } на read(t); var   i,n,t,c0,cn: integer;   noend: boolean; begin   randomize;   write('предельное количество членов последовательности: ');   read(n);   c0: =0; cn: =0;   i: =1; noend: =true;   writeln('члены последовательности');   while (i< =n) and noend do begin       t: =random(19)-9; { случайное значение на [-9; 9] }       write(t: 3);       if t=0 then begin if c0< 2 then inc(c0) end       else begin           if c0< > 2 then c0: =0;           if t< 0 then begin if cn< 3 then inc(cn) end           else if cn< > 3 then cn: =0       end;       noend: =(c0< > 2) or (cn< > 3);       inc(i)   end;   writeln;   if c0> =2 then writeln('в последовательности есть два нулевых члена подряд');   if cn> =3 then writeln('в последовательности есть три отрицательных члена подряд') end. тестовое решение: предельное количество членов последовательности: 200 члены последовательности   3 -9  9  9  0  3 -4 -9  3 -3  8 -1  5  1 -6 -9  5  9 -1  5 -6 -2 -4 -5 -1 -8  7  1  1 -6 -3  2 -8  8  8  3 -2 -4  0  8  5 -1  6 -6 -2  5  4  6  9  3  9 -3 -7 -8  4 -5  5  5  1 -1  5  5 -1 -1 -9 -4 -3  7  2  0  3  0  0 в последовательности есть два нулевых члена подряд в последовательности есть три отрицательных члена подряд блок-схема находится во вложении.