Mở tệp HOCSINH.DAT, đọc 4 số a,b,c,d. Tính hiệu 4 số đó và in ra màn hình
1 câu trả lời
uses crt;
var a,b,c,d: integer;
begin
assign(input,'HOCSINH.DAT');
assign(output,'HOCSINH.OUT');
reset(input); rewrite(output);
read(input,a,b,c,d);
close(input);
write(output,a-b-c-d);
close(output);
readln
end.
Câu hỏi trong lớp
Xem thêm
