const fi='input.inp'
fo='output.out'
var a,b:integer;
f1,f2:text;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,a,b);
if a<b then writeln(f2,a)
else writeln(f2,b);
close(f1);
close(f2);
end.
Viết chương trình đọc từ tệp Dữ liệu.int chứa 2 số nguyên bất kì . Tính và ghi kết quả vào tệp Kết quả.out 2 dòng , dòng đầu ghi giá trị tổng 2 số , dòng thứ 2 ghi giá trị trung bình của 2 số đó
viết chương trình đọc dữ liệu từ tệp ví dụ chấm txt bao gồm một dãy duy nhất chứa hai số nguyên a b tìm ucln(a; b )kết quả ghi vào têp vidu.out
Cho tệp ăn.txt chứa dãy các số nguyên liên tiếp viết cách nhau 1 dấu cách .viết CT đọc dữ liệu từ tệp txt tính tổng các số chẵn và tổng các số lẻ ghi kết quả vào tập kq.txt trên 2 dòng
cho tệp SONGUYEN.INP chứa 3 số nguyên a,b,c có kiểu dữ liệu kiểu long long. tìm giá trị lớn nhất của 3 số trên và ghi kết quả vào tệp lonnhat.out
viết chương trình tạo một tệp văn bản có tên songuyen.txt trong ổ đĩa C và ghi vào tệp các số nguyên từ 1 đến 20. Sau đó đọc các số nguyên từ tệp và in ra màn hình
1. Tệp 'DL.doc' trên đĩa D chỉ chứa 2 số nguyên a, b (Mỗi số nằm trên 1 dòng).
a) Viết chương trình đọc dữ liệu từ tệp 'DL.doc', in kết quả ra màn hình.
b)Viết chương trình đọc dữ liệu từ tệp 'DL.doc', ghi vào tệp 'TB.doc' trung bình cộng của 2 số a,b.
giả sử trên đĩa E có tệp SO.INP chứa nhiều dòng dữ liệu, mỗi dòng chứa hai số nguyên cách nhau bởi dấu cách. hãy viết chương trình đọc ra mỗi dòng dữ liệu trong tệp SO.INP, sau đó tính trung bình cộng của mỗi dòng và hiển thị kết quả trung bình cộng ra màn hình tương ứng với mỗi dòng dữ liệu? Mn giúp mik vs
Cho tệp cau2.inp chứa 3 số nguyên a, b, c viết chương trình đọc dữ liệu từ tệp. Tính delta và xét các trường hợp trong phương trình bậc 2 của delte, ghi kết quả vào tệp cau2.out
