Đang chuẩn bị liên kết để tải về tài liệu:
Nén Ảnh part 7

Tham khảo tài liệu 'nén ảnh part 7', văn hoá - nghệ thuật, điêu khắc - hội họa phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | for i 0 i N i fprintf fptr f f n d i r i fclose fptr double p double x double prob switch ch case 1 prob exp -x x 0.5 break case 2 prob 1.0 break case 3 prob exp -1.4142136 fabs x break return prob define EPS 1.0e-6 ------------------------------------ Calculating the next decision level given values for d i-11 and r i-1 . ----------------------------------- double decision_level double di_1 double ri_1 double delta di fun dfun ff area1 area2 int i if fabs di_1 10.0 delta 2.0 else delta 0.1 di ri_1 delta i 0 Using Newton-Raphson s method for root finding. while fabs delta EPS i if i 1000 381 printf n no convergence. n return di area1 Romberg di-1 di f1 area2 Romberg di-1 di f2 ff area1 area2 fun ri_1 -ff if fabs area2 1.0e-10 printf n A numerical problem was encountered. printf n Restart problem with a different choice. exit 1 dfun -p di di-ff area2 if fabs dfun 1.0e-10 gotoxy 1 20 printf n derivative f dfun printf n A numerical problem was encountered. printf n Restart problem with a different choice. exit 1 delta -fun dfun di delta return di -------------------------- functions used by numerical integration routine. ---------------------------------- double f1 double y return y p y double f2 double y return p y 382 -------------------------- Numerical integration using Romberg method. ----------------------------- double Romberg double di_1 double di double f double double T 10 10 h x Area int N k kk i j N 9 k 1 h di- di_1 T 0 0 h f di_1 f di 2.0 for i 1 i N i k 1 h 2.0 x di_1 - h Area 0.0 T 0 i T 0 i-1 2.0 for j 0 j k-1 j 2 x 2.0 h Area f x T 0 i Area h kk 1 for j 1 j i j kk 2 T j i kk T j-1 i -T j-1 i-1 float kk-1 return T N N Bài tập 13.8 1. Chạy chương trình 13.9 dùng các lựa chọn sau 3 bit 4 bit 5 bit 6 bit. .