const fi='input.txt';
fo='output.txt';
var f1,f2:text;
st:string;
i,d:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,st);
d:=length(st);
for i:=1 to d do
if st[i]='n' then write(f2,i:4);
close(f1);
close(f2);
end.
Bài 1: Viết chương trình đọc số nguyên dương n từ tệp C:\input.txt, ghi ra tệp
C:\output.txt tất cả các số nguyên từ 1 đến n.
C:\ Input.txt C:\ output.txt
7 1 2 3 4 5 6 7
Viết chương trình và sử dụng chương trình con đọc dữ liệu từ tệp input.txt chứa dãy số nguyên trên một dòng. Các số cách nhau một khoảng trắng
Tính tổng dãy số trong tập input.txt rồi ghi kết quả tổng này vào tập output.txt
Giúp em với ạ. Em cảm ơn
Cho 50 số nguyên được ghi trong tệp 'NUMBER.TXT' (dữ liệu được ghi trên một dòng). Hãy viết chương trình đọc các số nguyên chẵn trong 50 số nguyên đó và ghi ra tệp 'KQ.TXT' GIÚP E VỚI Ạ. E ĐANG CẦN GẤPPPPP
Cho tệp số nguyên Dl.txt chứa các số nguyên , mỗi số cách nhau một kí tự trắng .Viết chương trình đọc các số nguyên dương từ tệp rồi đưa ra tổng các số dương và ghi vào tệp soam.txt các số nguyên âm .
Cho 100 số nguyên được ghi trong tệp 'number.txt'. Hãy viết chương trình đọc 100 số nguyên trong tệp trên và sau đó ghi ra tệp 'KQ.TXT' các số chia hết cho 3
Cho tệp văn bản DLSO.TXT gồm nhiều dòng mỗi dòng chứa 2 số a,b mỗi số cách nhau 1 dấu cách. Viết chương trình tìm đọc dữ liệu từ tệp DLSO.TXT và ghi hét hết quả là giá trị nhỏ nhất của 2 số (mỗi dòng ghi 1 giá trị tương đương với 2 số ở dòng dữ liệu vào tương ứng đó được ghi vào tệp KETQUA.TXT
Cho tệp data.txt gồm 2 dòng , dòng đầu ghi số nguyên dương m, dòng 2 ghi m số nguyên. Hãy đọc dữ liệu từ tệp
a, ghi vào tệp mới songuyen.txt các số dương từ tệp data.txt
b, đếm số lượng các số là bội của một số nguyên k cho trước biết k nhập vào từ bàn phím
cho dãy số gồm N số tự nhiên a1,a2,a3,...aN .Viết chương trình in ra trung bình cộng của các phần tử trên .Dữ liệu vào bởi tệp DULIEU.INP có cấu trúc : dòng đầu tiên chứa số nguyên N ,dòng thứ 2 chứa các số a1,a2,a3,...aN các số cách nhau ít nhất một kí tự trống
Giúp mình với ạ 😥😥
Cho tệp A.in gồm nhiều dòng , mỗi dòng chứa một số nguyên. Hãy đếm và đưa ra các số lẻ. Kết quả ghi vào tệp B.out
Thanks !
