Bài 16: Ví dụ làm việc với tệp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Vinh Luong

Cho tệp D:\DuLieu.txt. gồm nhiều dòng, mỗi dòng chứa 2 số nguyên. VCT đọc các cặp số nguyên trong tệp đã cho và xuất ra màn hình tổng của từng cặp số tương ứng

Nguyễn Lê Phước Thịnh
26 tháng 2 2022 lúc 14:02

uses crt;

const fi='dulieu.txt'

var f1:text;

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

n,i:integer;

begin

clrscr;

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

n:=0;

while not eof(f1) do 

begin

n:=n+1;

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

end;

for i:=1 to n do 

  writeln(a[i]+b[i]);

close(f1);

readln;

end.


Các câu hỏi tương tự
Ngô Chí Thành
Xem chi tiết
Nguyễn Nhật Bình
Xem chi tiết
Hằng Dương Thanh
Xem chi tiết
Lê Thị Hồng Trang
Xem chi tiết
Exo Aeri
Xem chi tiết
Dương Hữu Thành
Xem chi tiết
Lan Ngọc
Xem chi tiết
Ngô Chí Thành
Xem chi tiết
Lê Đức Tài
Xem chi tiết