Viết các câu lệnh cần thiết để mở tệp bt1.txt và ghi vào đó nội dung 'tây ninh' ai đó giúp với
Viết chương trình để mở tệp văn bản HT. txt nhập từ bàn phím họ tên của em và ghi tệp đó
Cho tệp dulieuvao txt chứa dãy số nguyên viết chương trình đọc dãy số đó,sắp xếp thành tăng dần rồi ghi kết quả đó vào dulieura txt
ai có thể giúp mình được không ạ
Hãy bắt đầu một phiên làm việc mới: Khởi động Logo, mở một tệp chương trình chứa các thủ tục đã viết (ví dụ tệp Baihoc1.lgo) bằng cách gõ lệnh (Load “Baihoc1.lgo). Xem nội dung và cách sắp xếp các thủ tục trong tệp này bằng cách nháy nút lệnh Edall. Viết thêm một thủ tục mới, thực hiện thủ tục này và ghi lại tệp với tên cũ. (Chú ý: Tránh mở nhiều tệp liên tiếp).
Cho tệp văn bản có tên DATA2.TXT chứa một xâu bất kì không quá 255 kí tự gồm các chữ và số. Viết chương trình đọc xâu kí tự S từ từ tệp DATA2.TXT sau đó ghi dữ liệu là các thông tin sau vào tệp KQ2.TXT:
- Dòng 1: Số lần xuất hiện của kí tự "k" trong xâu?
- Dòng 2: Số lượng kí tự là số xuất hiện trong S (giữ nguyên thứ tự xuất hiện)?
Cho tệp văn bản có tên DATA2.TXT chứa một xâu bất kì không quá 255 kí tự gồm các chữ và số. Viết chương trình đọc xâu kí tự S từ từ tệp DATA2.TXT sau đó ghi dữ liệu là các thông tin sau vào tệp KQ2.TXT:
- Dòng 1: Số lần xuất hiện của kí tự "k" trong xâu?
- Dòng 2: Số lượng kí tự là số xuất hiện trong S (giữ nguyên thứ tự xuất hiện)?
Cho tệp văn bản có tên DATA2.TXT chứa một xâu bất kì không quá 255 kí tự gồm các chữ và số. Viết chương trình đọc xâu kí tự S từ từ tệp DATA2.TXT sau đó ghi dữ liệu là các thông tin sau vào tệp KQ2.TXT:
- Dòng 1: Số lần xuất hiện của kí tự "k" trong xâu?
- Dòng 2: Số lượng kí tự là số xuất hiện trong S (giữ nguyên thứ tự xuất hiện)?
Help me!!! Mai mk thi ạ
Cho tệp văn bản có tên DATA2.TXT chứa một xâu bất kì không quá 255 kí tự gồm các chữ và số. Viết chương trình đọc xâu kí tự S từ từ tệp DATA2.TXT sau đó ghi dữ liệu là các thông tin sau vào tệp KQ2.TXT:
- Dòng 1: Số lần xuất hiện của kí tự "k" trong xâu?
- Dòng 2: Số lượng kí tự là số xuất hiện trong S (giữ nguyên thứ tự xuất hiện)?
Hãy bắt đầu một phiên làm việc mới: Khởi động Logo, mở một tệp chương trình chứa các thủ tục đã viết (ví dụ tệp Baihoc2.lgo) bằng cách chọn File -> Load… và tìm tệp trong cửa sổ Open. Xem nội dung và cách sắp xếp các thủ tục trong tệp này bằng cách nháy nút lệnh Edall. Viết thêm một thủ tục mới, thực hiện thủ tục này và ghi lại tệp với tên cũ.
const fi='input.txt'
fo='chiahet.txt'
var f1,f2:text;
a:array[1..100]of integer;
i,n,dem:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
n:=0;
while not eoln(f1) do
begin
inc(n);
read(f1,a[n]);
end;
dem:=0;
for i:=1 to n do
if a[i] mod 3=0 then inc(dem);
writeln(f2,dem);
close(f1);
close(f2);
end.