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 nối tiếp. Giải hộ mình với không hiểu gì luôn. Hứa trả 5 sao ạ .viết chương trình pass cal ạ
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 nối tiếp. Giải hộ mình với không hiểu gì luôn. Hứa trả 5 sao ạ .viết chương trình pass cal ạ
program dien_tro;
uses crt;
var f:text;
R,R1,R2,R3:real;
begin
clrscr;
Assign(f,’Baitap.INP’); reset(F);
readln(f,R1,R2,R3);
R:=(R1+R2+R3)/3;
write(R:0:2);
readln;
end.