Thu Giang Nguyễn
Hỏi từ APP VIETJACK
Giúp mình với ạ
Viết chương trình đọc từ tệp dữ liệu IMP chứa số nguyên bất kì. Tính và ghi kết quả vào tệp kết quả OUT hai dòng. Dòng đầu ghi giá trị tổng 2 số đó. Dòng 2 ghi giá trị trung bình của 2 số đó.
Viết chương trình đọc từ tệp dữ liệu IMP chứa số nguyên bất kì. Tính và ghi kết quả vào tệp kết quả OUT hai dòng. Dòng đầu ghi giá trị tổng 2 số đó. Dòng 2 ghi giá trị trung bình của 2 số đó.
Quảng cáo
1 câu trả lời 312
2 năm trước
Var f1, f2: text;
Tong, a,b, i, tb: integer;
Begin
assign(f1, ‘DULIEU.IMP’);
reset(f1);
assign(f2, ‘KETQUA.OUT’);
rewrite(f2);
Tong;= a+b;
write(f1, Tong);
tb= (a+b)/2;
write(f2, tb);
close(f1);
close(f2);
End.
Thu Giang Nguyễn
· 2 năm trước
Cảm ơn ạ
Nguyễn Đức Hào
· 2 năm trước
Tong:= nha bạn ; gán công thức cho tb thì cũng là := ; các câu lệnh write nên đổi thành writeln để nó xuống dòng sẽ đẹp hơn ; thiếu readln ; ở kế cuối
Quảng cáo
Câu hỏi hot cùng chủ đề
Gửi báo cáo thành công!