uses crt;
const fi='bai1.inp'
var a,b:integer;
f:text;
begin
clrscr;
assign(f,fi); rewrite(f);
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
writeln(f,'a=',a);
writeln(f,'b=',b);
writeln(f,a,'+',b,'=',a+b);
close(f);
end.
1. Viết chương trình đọc 2 số a,b từ tệp INPUT.TXT và ghi tích của 2 số a,b đó vào tệp OUTPUT.TXT
INPUT.TXT 2 3
OUTPUT.TXT 6
2. Viết chương trình đọc 2 số a,b từ tệp DULIEU.TXT trên ổ đĩa D và ghi số lớn nhất trong 2 số a,b đó vào tệp KETQUA.TXT trên ổ đĩa D
D:\DULIEU.TXT 2 3
D:\KETQUA.TXT 3
Cho tệp Dulieu.txt chứa các số nguyên, mỗi giá trị cách nhau một khoảng trống.Đọc từ tệp ra các giá trị gắn vào 2 biến a,b. Tính tổng a+b và ghi ra kết quả vào tệp ketqua.txt Giúp em với ạ, chiều nay là deadline rồi ạ, em cảm ơn nhiều!!!
Cho 1 tệp có tên là mang.txt viết chương trình đọc dữ liệu từ tệp sau đó tính tổng các giá trị đọc được ghi vào tệp tong.txt
Viết chương trình tính tổng của n số nguyên có trong tệp Tong.inv. đưa giá trị tìm được ra tệp Tong.out. Dữ liệu vào gồm hai dòng dòng 1 ghi số nguyen dương n dòng 2 ghi n số nguyên dương dữ liệu ra một số nguyên duy nhất là tổng tìm được
1,Viết chương trình nhập vào 3 giá trị cho số A,B,C. Ghi giá trị lên file nguồn.txt 2, Đọc giá trị từ file nguồn.txt và ghi giá trị của file (KQ.TXT) a, tính trung bỉnh cộng giá trị các phần tử b, đưa ra GTLN, GTNN của các phần tử
viết chương trình nhập 2 số x,y từ bàn phím, tính tổng, hiệu, tích, thương của 2 số và ghi kết quả vào tệp 'KQ.TXT'
Viết chương trình cho máy tính đọc từ tệp DAYSO.txt gồm các số nguyên có ít nhất 2 dòng
Tính tổng cấc số có trong tệp DAYSO.txt, ghi kết quả ra màn hình và tệp KETQUA.txt
Tính tổng và trung bình cộng các số chẵn trong tệp dayso.txt, ghi các kết quả vào tệp KETQUA.txt
