Cho 3 điện trở R1,R2,R3 được đọc từ tệp ”Baitap.INP.” tính và đưa ra màn hình điện trở mắc song song. Giải hộ mình với viết chương trình Pascal ạ .h

0 bình luận về “Cho 3 điện trở R1,R2,R3 được đọc từ tệp ”Baitap.INP.” tính và đưa ra màn hình điện trở mắc song song. Giải hộ mình với viết chương trình Pascal ạ .h”

1. var r1, r2, r3, r: real;

         f: text;

   Begin

       Assign(f, ‘baitap.inp’); reset(f);

       Read(f, r1, r2, r3);

       R:=(r1*r2+r2*r3+r3*r1)/(r1*r2*r3);

       Write(‘R song song = ‘, r);

       Readln

   End.

   Bình luận