tailieunhanh - Ebook 101 thuật toán và chương trình - Bài toán khoa học kỹ thuật và kinh tế bằng ngôn ngữ Pascal: Phần 2

Phần 2 ebook 101 thuật toán và chương trình - Bài toán khoa học kỹ thuật và kinh tế bằng ngôn ngữ Pascal trình bày nội dung chương 4 - 101 chương trình. Tham khảo nội dung giáo trình để nắm bắt nội dung chi tiết. | CHƯƠNG 4 101 CHƯƠNG TRÌNH MOT SO VI DU PROGRAM VIDU1 Var x y A B C real Begin Writeln Vao so lieu Write X Readln x Wrỉte y Readln y A x x y y B - X y A C x y-A-B B Writeln A - A 8 3 J B B 8 3 c C 8 3 End. Program VIDV2 Var a b c real Begin write a readln a write b readln b write c readln c If a b then if a c then writeln Max la a a 4 else wrìteln Max la c c 4 else i f b c then vriteln Max la b b 4 else uriteln Max la c c 4 End. 139 Program VIDƯ3 label 222 var xTy f real Bogin write X readln x wri te y - readln y if x-y 0 then begin if y 0 then begi n f X tx y y end else Goto 222 end ______ else v if x y - 10 then begin. f x x x y yty end else 222. f - X y X y writelni f f 10 3 End. i Ỉ0 Program V1 DU4_Phuong_trinh_bac__haỉ var a b c real xl x2 delta real Begin Giai phuong trinh bac hai writeIn Vao cac he 30 a b c write a readin a write b readln b write c readln c writein A delta b b - 4 a c if delta 0 then begin writein Nghiem kep writein X -b 2 a 4 2 end if delta 0 then begin writein Hal nghiem thuc xl - b sqrt delta 2 a x2 - - b - sqrt delta 2 a writein xl - xl 4 2 writelni x2 - x2 4 2 end else begin writein Hal nghiem phuc lien hop xl -b 2 a x2 sqrt delta 2 a writein xl - xl 4 2 J abs x2 4 2 writein x2 xl 4 2 -J abs x2 4 2 end End. .

TỪ KHÓA LIÊN QUAN
crossorigin="anonymous">
Đã phát hiện trình chặn quảng cáo AdBlock
Trang web này phụ thuộc vào doanh thu từ số lần hiển thị quảng cáo để tồn tại. Vui lòng tắt trình chặn quảng cáo của bạn hoặc tạm dừng tính năng chặn quảng cáo cho trang web này.