Những câu hỏi liên quan
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
7 tháng 7 2017 lúc 11:38

Đáp án đúng : D

Bình luận (0)
Vy Chou
Xem chi tiết
Minh Lệ
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)
Ka Ka
Xem chi tiết
Nguyễn Lê Phước Thịnh
17 tháng 3 2021 lúc 21:41

const fi='mang.txt'

fo='tong.txt'

var f1,f2:text;

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

n,i,t:integer;

begin

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

assign(f2,fo); rewriteln(f2);

n:=0;

while not eof(f1) do 

  begin

inc(n);

read(f1,a[n]);

end;

t:=0;

for i:=1 to n do 

  t:=t+a[i];

writeln(f2,t);

close(f1);

close(f2);

end.

Bình luận (0)
LA VAN CAU
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
5 tháng 8 2018 lúc 12:29

Đáp án đúng : C

Bình luận (0)
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
6 tháng 5 2017 lúc 14:02

Đáp án đúng : C

Bình luận (0)
Thảo Ly
Xem chi tiết
Nguyễn Lê Phước Thịnh
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)
xzczwww22
Xem chi tiết
Miner Đức
Xem chi tiết