begin
assign(fi,'bt1.txt');rewrite(fi);
write(fi,'tay ninh');
end.
const fi='bt1.txt';
var f1:text;
begin
assign(f1,fi); rewrite(f1);
writeln(f1,'Tay Ninh');
close(f1);
end.
Cho tệp SN.INP gồm 2 số nguyên . viết chương trình tính hiệu của hai số đó và ghi kết quả vào tệp SN.OUT
Cho tệp SN.INP gồm 2 số nguyên . viết chương trình tính hiệu của hai số đó và ghi kết quả vào tệp SN.OUT E chạy pascal ạ . Làm chuẩn tí ạ
mọi người ơi giúp Dung~ với <3 khó quá huhu :((((((((
Hai tệp tin DULIEU1.TXT và DULIEU2.TXT được cho như sau:
- Tệp DULIEU1.TXTchứa 1 đoạn văn bản bất kỳ.
- Tệp DULIEU2.TXT chứa không quá 50 dòng.dòng gồm 2 từ: từ đầu là từ đích và từ sau là từ nguồn.
Hãy lập chương trình tìm trong tệp tin DULIEU1.TXT tất cả các từ là từ đích và thay thế chúng bằng các từ nguồn tương ứng.
Kết quả được ghi vào tệp KETQUA.TXT (Đó là đoạn văn bản tương tự như tệp tin DULIEU1.TXT nhưng được thay thế từ đích bằng từ nguồn)
Cho tệp BAIKT.INP chứa các số nguyên bất kì. Viết chương trình đếm xem trong tệp có bao nhiêu số lẻ rồi ghi kết quả vào tệp KETQUA.OUT giúp mình với mình đang gấp ạ. Mình cảm ơn nhiềuu
viết chương trình đọc 1 sâu kí tự từ tẹp input.txt. sau đó ghi vào tệp output.txt sau khi đã lạo cỏ các dấu cách
bài 1: viết các câu lệnh để ghi dữ liệu là 2 biến T , S từ chương trình vào tệp dulieu.txt (sử dụng biến tệp f2)
bài 2: viết các câu lệnh để đọc dữ liệu từ tệp dau.txt ra 2 biến a,b của chương trình ( sử dụng biến tệp f1 )
Viết chương trình và đưa ra màn hình diện tích S của hình chữ nhật có chiều dài a, chiều rộng b. Với các giá trịa,b được đọc từ tệp INPUTC2.TXT
Cho tệp bài tập .txt chứa 1 xâu bất kì không quá 100 kí tự. viết chương trình đọc dữ liệu từ tệp bài tập.txt
Kiểm tra xem nếu là chữ số
Cho tệp bài tập .txt chứa 1 xâu bất kì không quá 100 kí tự. viết chương trình đọc dữ liệu từ tệp bài tập.txt
Kiểm tra xem nếu là chữ số thì ghi ra màn hình, các kí tự còn lại ghi vào tệp.txt
thì ghi ra màn hình, các kí tự còn lại ghi vào tệp.txt
giúp em với ạ
