1. Viết chương trình nhập vào 2 số nguyên a và b từ bàn phím. Tính tổng của 2 số đó và ghi kết quả tổng vào tệp Ketqua.txt trong ổ E:\ .
2. Viết chương trình đọc 2 số nguyên từ tệp dulieu.txt trong ổ E:\ . Sau đó, tính tổng của 2 số và xuất kết quả tổng ra màn hình Pascal
Mong mọi người ráng giúp đỡ em ạ , em cảm ơn mọi người nhiều
Bài 1:
uses crt;
const fi='ketqua.txt';
var f1:text;
a,b,t:integer;
begin
clrscr;
assign(f1,fi); rewrite(f1);
write('a='); readln(a);
write('b='); readln(b);
t:=a+b;
writeln(f1,t);
close(f1);
readln;
end.
Bài 2:
uses crt;
const fi='dulieu.txt';
var f1:text;
a,b,t:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,a,b);
t:=a+b;
writeln('tong cua hai so la: ',t);
close(f1);
readln;
end.