Bài 16: Ví dụ làm việc với tệp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Thương Thương

Viết chương trình đọc từ tệp Tep1.txt các biến a,b,c,d,e,f. Tính và đưa ra kết quả xuống tệp Ketqua.txt

Tong LT=ab+cd+ef

Đoàn Xuân Sơn
10 tháng 3 2022 lúc 1:01

const fi='tep1.txt'

fo='ketqua.txt'

var

f1,f2:text;

b,d,f:byte;

T,a,c,e:longint;

begin

assign(f1,fi);

assign(f2,fo);

reset(f1);

rewrite(f2);

Readln(f1,a,b,c,d,e,f);

close(f1);

a:=exp(b*ln(a));

c:=exp(d*ln(c));

e:=exp(f*ln(e));

t:=a+c;

t:=t+e;

writeln(f2,t);

close(t2);

end.


Các câu hỏi tương tự
Huệ Bùi Thị Kim
Xem chi tiết
Dương Hữu Thành
Xem chi tiết
Duy Anh
Xem chi tiết
Đặc Nhiệm FBI
Xem chi tiết
Lê Tuấn Anh
Xem chi tiết
Xinh Xinh
Xem chi tiết
Linh Linh
Xem chi tiết
Lê Đức Tài
Xem chi tiết
Trần Vi Sa
Xem chi tiết