const fi='in,txt'
fo='out.txt'
var f1,f2:text;
begin
clrscr;
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
Đúng 0
Bình luận (0)
Bài 15: Thao tác với tệp
Các câu hỏi tương tự
Bài 1: Viết CT ghi các số nguyên từ 1-->10 vào tệp songuyen.doc,mỗi số ghi trên 1 dòng Bài 2: Đọc các số nguyên từ tệp songuyen.doc và ghi ra màn hình các số cách nhau ít nhất một dấu cách Các anh chị giúp em với ạ em đang cần gấp ạ:(( (pascal ạ)
Giải giúp em bài 7 ạ
Mọi người ơi giải bài này với giải thích hộ mình với ạ! Cho tệp "3.inp" gồm 1 số thực N(0
Cho tệp Dulieu.txt chứa các số nguyên, mỗi giá trị cách nhau một khoảng trống.Đọc từ tệp ra các giá trị gắn vào 2 biến a,b. Tính tổng a+b và ghi ra kết quả vào tệp ketqua.txt Giúp em với ạ, chiều nay là deadline rồi ạ, em cảm ơn nhiều!!!
Viết chương trình giải phương trình bậc 2 ax bình +bx+c bằng 0(a khác o) đọc các biến a,b,c từ tệp "dulieu.inp" và nghiệm phương trình đưa ra tệp "kq.inp" (giúp em với ạ)
Xem chi tiết
HUHU EM CẦN GẤP LẮM R Ạ. TRẢ LỜI DÙM EM TRONG CHIỀU NAY ĐC KO? CÂU HỎI LÀ
đọc 2 số x,y nguyên dương từ tệp 'baitap.txt' và đưa phép toán T=căn x^2+y^2 và đưa ra màn hình tổng T
cái này là tin 11 ạ
Viết chương trình ghi một file văn bản với nội dung là một bài thơ xuống đĩa. Kết thúc việc ghi bằng việc gõ 2 lần phím Enter.
Gải sử có tệp văn bản KT.TXT chứa xâu kí tự không quá 255. Viết chương trình đọc dữ liệu trong tệp KT.TXT vào biến S. Thay thế tất cả các cụm kí tự "anh" bằng cụm kí tự "em". Ghi xâu sau khi được thay thế vào tệp KQ.OUT
giúp em với mai em thi rồi ạ
Em đang cần gấp. Mọi người giúp em với ạ.
Cho tệp "Data.txt" chứa các số nguyên. Tính trung bình cộng các số lẻ và ghi kết quả vào "Ketqua.txt".