Question

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

Answer 1

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.