Составить программу на паскале для рекурсивного нахождения интеграла методом средних прямоугольников​

1.a) из объектов 2.b) растровое изображение 3.  c) увеличить растровое изображение 4.  c) теряются мелкие детали 5.b) векторный 6.  a) точка 7.  c) от яркости цветов на изображении 8.a) количество цветов в палитре 9.b) microsoft paintc) adobe photoshop 10.b) изменение размера происходит без потери качества 11.b) растровое изображение 12.c) rgb модель 13.a) принтерe) дисплейf) графопостроитель (плоттер) 14.b) corel draw 15.b) растровой графики. 16.c) зеленый 17.a) jpeg   c) gif   d) tif   e) png   f) bmp   h) pcd 18.b) 256 19.a) hsb 20.b) частота дискретизации

Function dec2n(dec,n: integer): string; var   d: byte;   ch: char;   s,sgn: string; begin       s: ='';       if dec< 0 then begin sgn: ='-'; dec: =-dec end       else sgn: ='';       while dec> 0 do           begin           d: =dec mod n;           ch: =chr(ord('0')+d);           s: =ch+s;           dec: =dec div n       end;       dec2n: =sgn+s end; var   m,n: integer; begin   write('введитt целое десятичное число и основание для перевода (2-9): ');   read(m,n);   writeln(dec2n(m,n)) end. тестовое решение 25 3 221 -38 9 -42