Những câu hỏi liên quan
TL
Xem chi tiết
NT
8 tháng 2 2022 lúc 23:39

có chức năng giúp cho chúng ta có thể thực hiện được những bài toán khi dữ liệu vào nằm trên tệp

Bình luận (0)
NH
Xem chi tiết
DT
10 tháng 10 2018 lúc 17:33

Đáp án đúng : A

Bình luận (0)
NH
Xem chi tiết
DT
29 tháng 3 2018 lúc 4:20

Đáp án đúng : A

Bình luận (0)
TH
Xem chi tiết
ML
10 tháng 5 2020 lúc 11:23

Program hotrotinhoc_hoc24;

const fi='dlv.inp';

fo='dlr.out';

var i,n,t: integer;

f: text;

a: array[1..100] of integer;

procedure ip;

begin

assign(f,fi);

reset(f);

readln(f,n);

for i:=1 to n do read(f,a[i]);

close(f);

end;

procedure out;

begin

assign(f,fo);

rewrite(f);

t:=0;

for i:=1 to n do t:=t+a[i];

write(f,t);

close(f);

end;

begin

ip;

out;

end.

Bình luận (0)
NH
Xem chi tiết
DT
17 tháng 8 2017 lúc 13:36

Assign(f1,’dulieu.txt’);

Reset(f1);

Read(f1,a,b);

Close(f1);

Bình luận (0)
NH
Xem chi tiết
DT
29 tháng 12 2017 lúc 16:07

Assign(f,’DL.TXT’);

Reset(f);

Read(f,x1,x2);

Close(f);

Bình luận (0)
VC
Xem chi tiết
ML
24 tháng 4 2020 lúc 21:25

Program hotrotinhoc_hoc24;

const fi='BT.TXT';

fo='KQ.TXT';

var f: text;

x,y,z: integer;

t: longint;

procedure ip;

begin

assign(f,fi);

reset(f);

read(f,x,y,z);

close(f);

end;

procedure out;

begin

assign(f,fo);

rewrite(f);

t:=x+y+z;

write(f,t);

close(f);

end;

begin

ip;

out;

end.

Bình luận (0)
CC
Xem chi tiết
ML
25 tháng 5 2020 lúc 21:16

Bài 1:

assign(f2,'dulieu.txt');

reset(f2);

readln(f2,T,S);

close(f2);

Bài 2:

assign(f1,'dau.txt');

reset(f1);

read(f1,a,b);

close(f1);

Bình luận (0)
NH
Xem chi tiết
DT
5 tháng 4 2019 lúc 9:57

Đáp án đúng : A

Bình luận (0)