1. Trang chủ
  2. » Công Nghệ Thông Tin

1 nguyen ly vet can toan bo

5 8 0

Đang tải... (xem toàn văn)

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 5
Dung lượng 111,5 KB

Nội dung

Gv: Nguyễn Trung Nhẫn - Phương pháp vét cạn Phương pháp vét cạn tồn Muốn tìm kim đống rơm, rút cọng rơm rút kim Mô tả tuật tốn: Gọi D khơng gian tốn (tập tất khả xảy toán) D = tập tất (x1, x2, …, xn) Trong đó: X1  D1 X2  D2 … Xn  Dn Và Di tập hữu hạn có số phần tử mi Gọi quy tắc xác định lời giải ánh xạ f f : D {True, False} Để tìm kiếm lời giải toán ta xét tất phần tử tập D, phần tử x=(x1,x2,…, xn) thỏa f(X)= True X lời giải toán Coloigiai:=false; For  x1  D1 For  x2  D2 … For  xn  Dn If f(x1,x2, ,xn)=True then begin lời giải coloigiai:=true end; If coloigiai= False then VD1 Vừa gà vừa chó 36 con, bó lại cho trịn 100 chân chẵn Tìm số gà, số chó loại? HD Ta có D = D1 x D2 D1: tập giá trị mà số gà nhận D1=[1 36] ga D2: tập giá trị mà số chó nhận D2=[1 25] cho Điều kiện nhận kết  Đk1: ga+cho =36  Đk2: ga x + cho x =100 Code tham khảo var ga, cho:byte; begin for ga:=1 to 36 for cho:=1 to 25 if (ga+cho=36) and (ga*2+cho*4=100) then write(ga:4,cho:4); readln end VD2 LỚP HỌC MÚA Gv: Nguyễn Trung Nhẫn - Phương pháp vét cạn Lớp học múa khiêu vũ hội giáo sư Padegras có n học sinh nam nữ ghi tên Giáo sư cho tất học sinh xếp thành hàng dọc chọn nhóm học sinh liên tiếp cho buổi học với yêu cầu số học sinh nam nữ phải Hãy xác định, giáo sư Padegras có cách lựa chọn khác cho buổi học Dữ liệu: Vào từ file văn DANCE.INP: Dòng chứa số nguyên n (1 ≤ n ≤ 106), Dòng thứ chứa xâu độ dài n bao gồm ký tự từ tập {a, b} xác định dòng xếp hàng, a nam, b – nữ Kết quả: Đưa file văn DANCE.OUT số nguyên – số cách lựa chọn Ví dụ: DANCE.INP DANCE.OUT abbababa 13 Kiểm tra xâu k ký tự liên tiếp nhau, với k = ÷ n Phát biểu lại tốn: Đếm xem có xâu có số kí tự a số kí tự b function compare(st:string):boolean; var x,y,j:integer;ss:boolean; begin x:=0;y:=0; for j:=1 to length(st) begin if st[j]='a' then inc(x); if st[j]='b' then inc(y); end; if x=y then ss:=true else ss:=false; compare:=ss; end; Code tham khảo procedure xuly; begin k:=0; repeat k:=k+1; for i:=1 to n-k+1 for j:=i+k-1 to n if compare(copy(s,i,j-i+1)) then inc(dem); until k='0') and (s[i]='A') and (s[i]='a') and (s[i]

Ngày đăng: 11/10/2021, 15:35

TỪ KHÓA LIÊN QUAN

w