Сколько всего вагонов в поезде, в котором средний вагон-пятый?

всего вагонов   9 так как 5 сркдний   а по 4 спереди и взаде

 

в этом поезде всего 9 вагонов

Const n=10;   var x: array[1..n] of integer; i,c: integer; begin writeln('исходный массив: '); for i: =1 to n do   begin   x[i]: =random(21)-10;   write(x[i]: 4);   end; writeln; for i: =1 to n div 2 do   begin c: =x[i]; x[i]: =x[n-i+1]; x[n-i+1]: =c; end; writeln('измененный массив: '); for i: =1 to n do write(x[i]: 4); writeln; end. пример: исходный массив:   -9   1   -7   3   -6   7   7   10   9   7 измененный массив:     7   9   10   7   7   -6   3   -7   1   -9

Поиск простых делителей числа: var i,j,n: longint;       f: boolean; begin   writeln('введите число');   readln(n);   if n< 2 then writeln('простых делителей нет')   else     begin       write('число ',n,' ','= 1');       for i: =2 to n do         if n mod i=0 then           begin             f: =true;             j: =2;             while f and(j< =round(sqrt(i/               begin                 if i mod j=0 then f: =false                 else j: =j+1;               end;           if f then write('*',i);         end;     end; end. тестовое решение: введите число 2345 число 2345 = 1*5*7*35*67