K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

15 tháng 10 2021

1 tệp thì chứa dữ liệu

13 tháng 12 2021

D

13 tháng 12 2021

d

14 tháng 12 2021

β nhoa

const fi='dulieu.txt';     

fo='ketqua.txt';

var f1,f2:text;   

a,b,c,d:array[1..100]of integer;   

i,n,dem,dem1:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

n:=0;

while not eof(f1) do 

begin     

n:=n+1;     

readln(f1,a[n],b[n]); 

end;

dem:=0;

dem1:=0;

for i:=1 to n do 

if a[i]>b[i] then     

begin       

inc(dem);       

inc(dem1);       

c[dem]:=a[i];       

d[dem]:=b[i];     

end 

else begin         

inc(dem);         

inc(dem1);         

c[dem]:=b[i];         

d[dem]:=a[i];       

end;

for i:=1 to dem do 

write(f2,c[i]:4);

writeln(f2);

for i:=1 to dem1 do 

write(f2,d[i]:4);

close(f1);

close(f2);

end.

Tập tin (viết tắt cho tập thông tin; còn được gọi là tệptệp tin); tiếng Anh: file; là một tập hợp của thông tin được đặt tên. Thông thường thì các tập tin này chứa trong các thiết bị lưu trữ như đĩa cứng, đĩa mềm, CD, DVD cũng như là các loại chip điện tử dùng kĩ thuật flash có thể thấy trong các ổ nhớ có giao diện USB

*suprise*

make friend with me

tệp tin ( file ) là tập hợp các thông tin có liên quan với nhau được lưu trữ trên bộ nhớ ngoài. Cụ thể tệp tin là các chương trình , dữ liệu được lưu trên đĩa . Để phân biệt các tệp tin với nhau thì mỗi cái có 1 tên

các loại tệp tin là âm thanh, hình ảnh, văn bản, chương trình

QT
Quoc Tran Anh Le
Giáo viên
28 tháng 11 2023

a) Cây thư mục ở Hình 9: Ổ đĩa tên là (G:).

b) Trong thư mục Hoc tap chứa:

- Thư mục con: Toan, Tin hoc.

- Tệp: Sach Toan, Vo Toan 3, Sach Tin hoc, Vo Tin hoc 3, Danh muc sach vo.

c) Các bước tìm đến tệp:

- Danh muc sach vo:

Mở ổ đĩa (G:) trong máy tính.

Mở thư mục Hoc tap.

Tìm tệp Danh muc sach vo.

- Vo Tin hoc 3:

Mở ổ đĩa (G:) trong máy tính.

Mở thư mục Hoc tap.

Tiếp tục mở thư mục Tin hoc.

Tìm tệp Vo Tin hoc 3.

24 tháng 12 2020

C nha

25 tháng 12 2020

c

const fi='songuyen.txt';

fo='kluan.txt';

var f1,f2:text;

n:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

if n mod 2=0 then writeln(f2,'La so chan')

else writeln(f2,'La so le');

close(f1);

close(f2);

end.

15 tháng 11 2021

3125 ảnh như vậy

const fi='bt.inp';

fo='bt.out';

var f1,f2:text;

st:string;

i,d,dem:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,st);

d:=length(st);

dem:=0;

for i:=1 to d do 

  if st[i]=#32 then inc(dem);

writeln(f2,dem);

close(f1);

close(f2);

end.