tệp in.txt lưu trữ 3 số nguyên trên 3 dòng viết câu lệnh đọc dữ liệu từ tệp in.txt và câu lệnh ghi vào tệp out.txt tổng 3 số đó

Question

truongankim · Answer

VAR F:TEXT;

A,B,C:QWORD;

BEGIN

ASSIGN(F,’IN.TXT’);RESET(F);

READLN(A); READLN(B); READLN(C);

CLOSE(F);

ASSIGN(F,’OUT.TXT’);REWRITE(F);

WRITELN(A,’ ‘,B,’ ‘,C,’ ‘);

CLOSE(F);

END.

0 bình luận về “tệp in.txt lưu trữ 3 số nguyên trên 3 dòng viết câu lệnh đọc dữ liệu từ tệp in.txt và câu lệnh ghi vào tệp out.txt tổng 3 số đó”