Bài 15: Thao tác với tệp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Trang Ha
Viết chương trình đọc số nguyên n từ tệp songuyen.txt ; ghi vào tệp kluan.txt kết luận n là số chẵn hay số lẻ ? Biết tệp songuyen.txt chỉ chứa một số nguyên duy nhất.
Nguyễn Lê Phước Thịnh
27 tháng 2 2021 lúc 19:30

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.


Các câu hỏi tương tự
Huy Đan
Xem chi tiết
Dania sunna
Xem chi tiết
Mĩ Lâm
Xem chi tiết
Nguyễn Đức Anh Khoa
Xem chi tiết
Trường hat trick
Xem chi tiết
Quốc Đạt Trần
Xem chi tiết
33. PHAN THỊ HỒNG THẮM 1...
Xem chi tiết
Lan Ngọc
Xem chi tiết
Kiên Tạ
Xem chi tiết