chương trình đọc 2 số từ tệp "tep.in" sau đó tính tổng và tích của 2 số nguyên rồi ghi ra tệp "tep.out'
2 câu trả lời
uses crt;
var f:text;
x,y:byte;
BEGIN
clrscr;
assign(f,'so.txt');
rewrite(f);
write(f,5,' ',15);
close(f);
reset(f);
read(f,x,y);
close(f);
writeln('Tong=',x+y);
writeln('Hieu=',x-y);
writeln('Tich=',x*x);
write('Thuong=',x/y:0:3);
readln
END.
Cho mik ctlhn nha.
