Ngày tải lên :
30/07/2013, 01:25
... i:byte; tong:integer; begin input; sapxeptang(d,n); sapxeptang(v,m); tong:=0; for i:=1 to n tong:=tong+v[n-i+1,1]*d[i,1]; for i:=1 to n v[i,1]:=d[n-i+1,2]; xapxeptang(v,n); assign(f,fo); rewrite(f); ... vv vv xx vv dd xx vv dd xx Bài 27/2000 - Bàn cờ (Dành cho học sinh THPT) Chương trình bạn Nguyễn Tiến Dũng lớp 8A2 trường PTTH chuyên Bến Tre, tỉnh Bến Tre Program Ban_co; Uses Crt; Var a: array ... 10000000 00000010 00010000 00000001 00100000 00001000 Để tìm hết nghiệm phải sử dụng thuật toán Đệ quy - Quay lui Sau chương trình, chạy 92 nghiệm ghi kết file HAU.OUT {$A+,B-,D+,E+,F-,G-,I+,L+,N-,O-,P-,Q+,R+,S+,T-,V+,X+}...