Вычислить сумму первых n слагаемых : s= 1+3\2+5\3+7\4=9\5+

5< =x< 5 (x> =-5) and (x< 5) при x = 9  (9> =-5) and (9< 5)     да              нет ответ: 9 не  принадлежит  промежутку [-5; 5)при x = 0  (0> =-5) and (0< 5)     да                да ответ: 0 принадлежит  промежутку [-5; 5) при x = -9  (-9> =-5) and (-9< 5)       нет              да ответ: -9 не  принадлежит  промежутку [-5; 5)

Type   st = record       iquo: integer; {целая часть}       irem: integer; {числитель дроби}       idiv: integer; {знаменатель дроби}   end; function imax(i, j: integer): integer; begin   if i > j then imax : = i else imax : = j end; function imin(i, j: integer): integer; begin   if i < j then imin : = i else imin : = j end; function fr(i, j, k: integer): st; var   nmax, nmin: integer; begin   nmax : = imax(imax(i, j), k);   nmin : = imin(imin(i, j), k);   with result do   begin       iquo : = nmax div nmin;       idiv : = nmin;       irem : = nmax mod nmin   end end; var   a, b, c: integer;   r: st; begin   write('введите через пробел три целых числа: ');   readln(a, b, c);   r : = fr(a, b, c);   writeln('результат работы функции: ', r.iquo, ' целых и ', r.irem, '/', r.idiv) end. тестовое решение: введите через пробел три целых числа: 343 253 37 результат работы функции: 9 целых и 10/37