Question

Cho tệp kiemtra.txt chứa 3 số nguyên, mỗi số nằm trên một dòng. Hãy viết chương trình đọc 3 số nguyên từ tệp kiemtra.txt và đưa vào 3 biến a, b, c. Tính và đưa ra màn hình kết quả (a+b),(a+c),(c*b). Giúp e vs mn ơi

Answer 1

uses crt;

const fi='kiemtra.txt'

var f1:text;

a,b,c:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

readln(f1,a,b,c);

writeln((a+b)*(a+c)*(b+c));

close(f1);

readln;

end.