Bài Toán Về Pascal cần người giỏi - VN-Zoom forum

khoabachpro · 19-04-2008, 11:05

Ai giỏi về pascal thì hãy pm cho mình.Có 1 bài toán thằng em vừa đưa mà mình ko làm được.Học từ lớp 10 nên quên hết rồi.Vì thế bạn nào giỏi hãy pm nhanh cho mình qua YH nha minh gửi cho mà làm

vietanh279 · 19-04-2008, 12:52

bạn cứ post bài lên đi, anh em có gì giúp đỡ, cho ý kiến, chứ việc gì phải giúp riêng thế ?

khoabachpro · 19-04-2008, 13:25

hì bài dài quá nên ngại thôi mà.Mình ghi zậy cho nhanh,anh em nào có khả năng thì giúp mình.pm YH

giangmeo · 19-04-2008, 13:58

ối pót lên hay hơn bạn ah

khoabachpro · 19-04-2008, 17:10

1.bài tập kiểu file
file vào gồm 6 dòng, mỗi dòng mô tả 1 tấm gỗ và chứa 2 số nguyên w và h (1=<w,h=<10000) tương ứng là chiều dài và cao của tấm gỗ
File ra thông báo xem có thể tạo 1 hộp từ 6 tấm gỗ để làm các mặt của nó ko .
VD
input
1345 2584
2584 683
2584 1345
683 1345
683 1345
2584 683
output : Có thể
2.bài tập kiểu chương trình con
cho cơ số B (2=<B=<20), hãy tìm tất cả các số nguyên N (1=<N=<300 cơ số 10) sao cho bình phương của N khi biểu diễn trong cơ số B là 1 số đối xứng. Sử dụng các chữ cái A,B để biểu diễn các số 10,11,...
Ghi cả số N và bình phương của nó trong cơ số B
input : file vào gồm 1 dòng chứa cơ số B
output : mỗi dòng của file ra chứa 2 số nguyên biểu diễn trong cơ số B. Số đầu tiên là số nguyên mà bình phương của nó là 1 số đối xứng, số nguyên thứ 2 laf chính số bình phương đó. Giưa 2 số ghi cách nhau 1 dấu cách, các dòng ghi ra theo thứ tự tăng của số đầu tiên .
VD
input 10
ouutput
1 1
2 4
3 9
11 121
22 484
26 676
101 10201
111 12321
121 14641
202 40804
212 44944
264 69696

Các bạn giải hộ mình nhé thank!!!

phuc1991 · 19-04-2008, 17:16

khong thay chu gi het sao ma giup duoc day?

khoabachpro · 19-04-2008, 20:55

ặc bạn phải ấn vào xem kích thước thật chứ,ko biết thì đừng SPAM thế chứ.

Mr_Dolphin · 19-04-2008, 23:38

Bạn mới là lạ đó, bạn kêu lười không muốn post lên đây bảo mọi người pm qua mail, tôi lại tưởng bài của bạn trên giấy bạn lười không muốn đánh đề vào, hoá ra là nó ở trong word,
bó tay, sao không thay vì chụp ảnh bạn copy từ word rồi paste lên đây có phải nhanh hơn không.

Voldark · 20-04-2008, 00:02

Mình chưa làm hoàn chỉnh, nên chỉ xin đóng góp ý tưởng về thuật toán (ý tưởng thôi, không phải thuật toán)
Bài thứ 2 thú thực mình... cóc hiểu đề, nên chỉ mạo muội "sì pam" cho bài 1 thôi

Bước 1: So sánh các tấm gỗ đó, từng đôi một. Đặt một biến giá trị là Boolean, ví dụ như biến SS đi chẳng hạn. Nếu như không có đủ 3 cặp giống nhau về kích thước thì dĩ nhiên không thể lắp thành hộp (biến SS nhận giá trị là False).
Việc so sánh này lưu ý đảm bảo 2 điều:
(i) mỗi khi 1 tấm tìm được cặp đôi của nó (hay nói cách khác là tấm gỗ đối diện khi lắp vào hộp - cùng kích thước) thì chúng ta phải loại ngay cặp đôi đó ra, không dùng để so sánh nữa, nếu không thì sự so sánh có thể sẽ bị trùng và bài toán tất nhiên không thể trọn vẹn.
(ii) so sánh w với w, h với h và cả w với h (2 tấm gỗ bằng nhau là 2 tấm có w1=w2 và h1=h2 hoặc w1=h2 và h1=w2)

Bước 2: Nếu chúng ta thành lập được 3 cặp giống nhau (biến SS nhận giá trị True) thì sẽ tiếp tục tiến trình so sánh, để xem các góc của tấm gỗ có thể vừa vào nhau không (VD: tấm có kích thước (như cách bạn viết) là 213 415 dĩ nhiên phải lắp với 1 tấm nào đó có w hoặc h bằng 213 hoặc 415). Việc so sánh này có lẽ kì công hơn công đoạn so sánh trong bước 1 một chút, vì thực sự dù tìm được tấm ván lắp vừa vào nhau, chúng ta cũng không thể loại bớt giá trị ra. Ví dụ: tấm 213 415 sẽ lắp vừa với tấm 213 589, những cũng sẽ có thể đi cùng với tấm 879 213. Vấn đề ở đây là vừa phải so sánh vừa phải chọn ra những cặp hợp nhất.
Nếu so sánh trong bước 2 không tìm được thì nghĩa là bài toán cũng vô nghiệm. Nếu tìm ra thì nghĩa là có thể

Đó là đóng góp của mình cho bài toán đầu tiên, bài 2 mình không hiểu đề

. Xin chỉ giáo!

khoabachpro · 20-04-2008, 08:32

bài 1 mình cũng làm được rồi bạn à, chủ yếu là bài 2.Hix thôi cảm ơn các bạn nhiều nha.Thằng em mình vừa thi xong rồi,nên chắc ko cần giải nữa đâu thank 1 lần nữa nha.
Còn việc ko copy bài lên là chuyện khó nói sr nha. vì office nhà mình hỏng ko đọc được bài nên lấy ảnh thằng em chụp cho post lên chứ.

giangmeo · 20-04-2008, 16:19

bài hai bạn phải dùng các phép tính trên chuổi ấy nhân chuổi chăng hạn.còn kiểm tra chuổi có đối xứng không thì khá đơn giản.còn việt đổi hệ cơ số thì chỉ cần một vóng lặp mà thôi.

giangmeo · 20-04-2008, 16:19

tớ chỉ nghỉ đến cách duyệt mà thôi

Voldark · 25-04-2008, 00:08

Mình thì chả hiểu đề bài bài 2 >.<. Đề bài hơi "Ambiguous" >.<, sorry

thienthan · 25-04-2008, 08:54

Bài 2: Điều đầu tiên mình nghĩ tới là dùng thuật toán vét cạn chắc chắn ra còn tối ưu thuật toán là cả vấn đề (nhưng số nhỏ như vậy nên không sợ).

Phân tích bài toán thấy để thống nhất ít phải chuyển đổi ta lưu số (đã bình phương và chuyển sang hệ cơ số B) bằng một chuỗi.

Viết một chương trình con chuyển đổi số từ hệ cơ số 10 sang hệ cơ số B

Code:

Function doicoso(So:integer; Coso:byte):string;

Ví dụ số abcd được biểu diễn dưới hệ cơ số x thì:
3210
abcd = a*x^3+b*x^2+c*x^1+d*x^0
abcd = a*x^3+b*x^2+c*x+d (viết gọn).

Khi đó muốn đổi từ hệ cơ số 10 sang các hệ cơ số khác ta lấy số đó chia hệ cơ số lấy phần dư, và tiếp tục lấy kết quả phép chia (chia nguyên div) chia tiếp cho hệ cơ số đển khi phần dư bằng 0.
Viết các số dư theo thứ tự kết quả sau viết trước ta được số ở hệ cơ số cần đổi.

Sau đó bạn viết tiếp một chương trình con để kiểm tra tính đối xứng.

Code:

Function doixung(so:string):boolean;

Việc này đơn giản do số đưa vào chuỗi rồi chỉ cần kiểm tra tính đối xứng của chuôi thôi.

Còn việc ghi ra file thì đơn giản rôi.

giangmeo · 25-04-2008, 12:47

duyệt chưa phải là cách hay nhất đâu có lẻ nên dùng chuổi

19-04-2008, 11:05	#1
khoabachpro Rìu Sắt Tham gia: Apr 2008 Đến từ: Hà Nội Bài: 129 VZD: 2.984 Điểm: 193/52 bài viết	Bài Toán Về Pascal cần người giỏi Ai giỏi về pascal thì hãy pm cho mình.Có 1 bài toán thằng em vừa đưa mà mình ko làm được.Học từ lớp 10 nên quên hết rồi.Vì thế bạn nào giỏi hãy pm nhanh cho mình qua YH nha minh gửi cho mà làm __________________ [b]Khuyến cáo của tôi "các bạn nên sử dụng Fire Fox để nâng cao tính bảo mật và tốc độ khi trình duyệt" Link download FireFox 3 beta5 Ấn Vào Đây hay_yeu2828@yahoo.com(hayyeu2828@gmail.com) Rất mong các bạn ghé thăm Ngôi nhà nhỏ của mình

19-04-2008, 12:52	#2
vietanh279 Rìu Bạc Đôi Tham gia: Jan 2008 Đến từ: Hà Nội Bài: 607 VZD: 10.502 Điểm: 448/124 bài viết	bạn cứ post bài lên đi, anh em có gì giúp đỡ, cho ý kiến, chứ việc gì phải giúp riêng thế ? __________________ Let's press and all best things will come to you Life is Football. Football is MANCHESTER UNITED http://manutdvn.net/ http://www.vn-zoom.com/groups/fan-football.html

19-04-2008, 13:25	#3
khoabachpro Rìu Sắt Tham gia: Apr 2008 Đến từ: Hà Nội Bài: 129 VZD: 2.984 Điểm: 193/52 bài viết	hì bài dài quá nên ngại thôi mà.Mình ghi zậy cho nhanh,anh em nào có khả năng thì giúp mình.pm YH __________________ [b]Khuyến cáo của tôi "các bạn nên sử dụng Fire Fox để nâng cao tính bảo mật và tốc độ khi trình duyệt" Link download FireFox 3 beta5 Ấn Vào Đây hay_yeu2828@yahoo.com(hayyeu2828@gmail.com) Rất mong các bạn ghé thăm Ngôi nhà nhỏ của mình

19-04-2008, 17:10	#5
khoabachpro Rìu Sắt Tham gia: Apr 2008 Đến từ: Hà Nội Bài: 129 VZD: 2.984 Điểm: 193/52 bài viết	1.bài tập kiểu file file vào gồm 6 dòng, mỗi dòng mô tả 1 tấm gỗ và chứa 2 số nguyên w và h (1=<w,h=<10000) tương ứng là chiều dài và cao của tấm gỗ File ra thông báo xem có thể tạo 1 hộp từ 6 tấm gỗ để làm các mặt của nó ko . VD input 1345 2584 2584 683 2584 1345 683 1345 683 1345 2584 683 output : Có thể 2.bài tập kiểu chương trình con cho cơ số B (2=<B=<20), hãy tìm tất cả các số nguyên N (1=<N=<300 cơ số 10) sao cho bình phương của N khi biểu diễn trong cơ số B là 1 số đối xứng. Sử dụng các chữ cái A,B để biểu diễn các số 10,11,... Ghi cả số N và bình phương của nó trong cơ số B input : file vào gồm 1 dòng chứa cơ số B output : mỗi dòng của file ra chứa 2 số nguyên biểu diễn trong cơ số B. Số đầu tiên là số nguyên mà bình phương của nó là 1 số đối xứng, số nguyên thứ 2 laf chính số bình phương đó. Giưa 2 số ghi cách nhau 1 dấu cách, các dòng ghi ra theo thứ tự tăng của số đầu tiên . VD input 10 ouutput 1 1 2 4 3 9 11 121 22 484 26 676 101 10201 111 12321 121 14641 202 40804 212 44944 264 69696 Các bạn giải hộ mình nhé thank!!! __________________ [b]Khuyến cáo của tôi "các bạn nên sử dụng Fire Fox để nâng cao tính bảo mật và tốc độ khi trình duyệt" Link download FireFox 3 beta5 Ấn Vào Đây hay_yeu2828@yahoo.com(hayyeu2828@gmail.com) Rất mong các bạn ghé thăm Ngôi nhà nhỏ của mình thay đổi nội dung bởi: khoabachpro, 20-04-2008 lúc 08:30.

19-04-2008, 20:55	#7
khoabachpro Rìu Sắt Tham gia: Apr 2008 Đến từ: Hà Nội Bài: 129 VZD: 2.984 Điểm: 193/52 bài viết	ặc bạn phải ấn vào xem kích thước thật chứ,ko biết thì đừng SPAM thế chứ. __________________ [b]Khuyến cáo của tôi "các bạn nên sử dụng Fire Fox để nâng cao tính bảo mật và tốc độ khi trình duyệt" Link download FireFox 3 beta5 Ấn Vào Đây hay_yeu2828@yahoo.com(hayyeu2828@gmail.com) Rất mong các bạn ghé thăm Ngôi nhà nhỏ của mình

19-04-2008, 13:58	#4
giangmeo Búa Gỗ Đôi Tham gia: Mar 2008 Bài: 44 VZD: 828 Điểm: 0/0 bài viết	ối pót lên hay hơn bạn ah

19-04-2008, 17:16	#6
phuc1991 Gà Con Tham gia: Apr 2008 Bài: 5 VZD: 290 Điểm: 0/0 bài viết	khong thay chu gi het sao ma giup duoc day?

19-04-2008, 23:38	#8
Mr_Dolphin Rìu Bạc Tham gia: Dec 2007 Bài: 319 VZD: 4.904 Điểm: 81/54 bài viết	Bạn mới là lạ đó, bạn kêu lười không muốn post lên đây bảo mọi người pm qua mail, tôi lại tưởng bài của bạn trên giấy bạn lười không muốn đánh đề vào, hoá ra là nó ở trong word, bó tay, sao không thay vì chụp ảnh bạn copy từ word rồi paste lên đây có phải nhanh hơn không. __________________ -_::Tin Học là chia sẻ ::_- http://cnttk1a.hnsv.com Chào mừng các bạn đến diễn đàn lớp tui!

20-04-2008, 00:02	#9
Voldark Rìu Sắt Tham gia: Feb 2008 Bài: 181 VZD: 2.615 Điểm: 62/23 bài viết	Mình chưa làm hoàn chỉnh, nên chỉ xin đóng góp ý tưởng về thuật toán (ý tưởng thôi, không phải thuật toán) Bài thứ 2 thú thực mình... cóc hiểu đề, nên chỉ mạo muội "sì pam" cho bài 1 thôi Bước 1: So sánh các tấm gỗ đó, từng đôi một. Đặt một biến giá trị là Boolean, ví dụ như biến SS đi chẳng hạn. Nếu như không có đủ 3 cặp giống nhau về kích thước thì dĩ nhiên không thể lắp thành hộp (biến SS nhận giá trị là False). Việc so sánh này lưu ý đảm bảo 2 điều: (i) mỗi khi 1 tấm tìm được cặp đôi của nó (hay nói cách khác là tấm gỗ đối diện khi lắp vào hộp - cùng kích thước) thì chúng ta phải loại ngay cặp đôi đó ra, không dùng để so sánh nữa, nếu không thì sự so sánh có thể sẽ bị trùng và bài toán tất nhiên không thể trọn vẹn. (ii) so sánh w với w, h với h và cả w với h (2 tấm gỗ bằng nhau là 2 tấm có w1=w2 và h1=h2 hoặc w1=h2 và h1=w2) Bước 2: Nếu chúng ta thành lập được 3 cặp giống nhau (biến SS nhận giá trị True) thì sẽ tiếp tục tiến trình so sánh, để xem các góc của tấm gỗ có thể vừa vào nhau không (VD: tấm có kích thước (như cách bạn viết) là 213 415 dĩ nhiên phải lắp với 1 tấm nào đó có w hoặc h bằng 213 hoặc 415). Việc so sánh này có lẽ kì công hơn công đoạn so sánh trong bước 1 một chút, vì thực sự dù tìm được tấm ván lắp vừa vào nhau, chúng ta cũng không thể loại bớt giá trị ra. Ví dụ: tấm 213 415 sẽ lắp vừa với tấm 213 589, những cũng sẽ có thể đi cùng với tấm 879 213. Vấn đề ở đây là vừa phải so sánh vừa phải chọn ra những cặp hợp nhất. Nếu so sánh trong bước 2 không tìm được thì nghĩa là bài toán cũng vô nghiệm. Nếu tìm ra thì nghĩa là có thể Đó là đóng góp của mình cho bài toán đầu tiên, bài 2 mình không hiểu đề . Xin chỉ giáo!

20-04-2008, 08:32	#10
khoabachpro Rìu Sắt Tham gia: Apr 2008 Đến từ: Hà Nội Bài: 129 VZD: 2.984 Điểm: 193/52 bài viết	bài 1 mình cũng làm được rồi bạn à, chủ yếu là bài 2.Hix thôi cảm ơn các bạn nhiều nha.Thằng em mình vừa thi xong rồi,nên chắc ko cần giải nữa đâu thank 1 lần nữa nha. Còn việc ko copy bài lên là chuyện khó nói sr nha. vì office nhà mình hỏng ko đọc được bài nên lấy ảnh thằng em chụp cho post lên chứ. __________________ [b]Khuyến cáo của tôi "các bạn nên sử dụng Fire Fox để nâng cao tính bảo mật và tốc độ khi trình duyệt" Link download FireFox 3 beta5 Ấn Vào Đây hay_yeu2828@yahoo.com(hayyeu2828@gmail.com) Rất mong các bạn ghé thăm Ngôi nhà nhỏ của mình

20-04-2008, 16:19	#11
giangmeo Búa Gỗ Đôi Tham gia: Mar 2008 Bài: 44 VZD: 828 Điểm: 0/0 bài viết	bài hai bạn phải dùng các phép tính trên chuổi ấy nhân chuổi chăng hạn.còn kiểm tra chuổi có đối xứng không thì khá đơn giản.còn việt đổi hệ cơ số thì chỉ cần một vóng lặp mà thôi.

25-04-2008, 00:08	#13
Voldark Rìu Sắt Tham gia: Feb 2008 Bài: 181 VZD: 2.615 Điểm: 62/23 bài viết	Mình thì chả hiểu đề bài bài 2 >.<. Đề bài hơi "Ambiguous" >.<, sorry

25-04-2008, 08:54	#14
thienthan Rìu Sắt Đôi Tham gia: Nov 2007 Bài: 291 VZD: 4.580 Điểm: 86/69 bài viết	Bài 2: Điều đầu tiên mình nghĩ tới là dùng thuật toán vét cạn chắc chắn ra còn tối ưu thuật toán là cả vấn đề (nhưng số nhỏ như vậy nên không sợ). Phân tích bài toán thấy để thống nhất ít phải chuyển đổi ta lưu số (đã bình phương và chuyển sang hệ cơ số B) bằng một chuỗi. Viết một chương trình con chuyển đổi số từ hệ cơ số 10 sang hệ cơ số B Code: Function doicoso(So:integer; Coso:byte):string; Ví dụ số abcd được biểu diễn dưới hệ cơ số x thì: 3210 abcd = ax^3+bx^2+cx^1+dx^0 abcd = ax^3+bx^2+cx+d (viết gọn). Khi đó muốn đổi từ hệ cơ số 10 sang các hệ cơ số khác ta lấy số đó chia hệ cơ số lấy phần dư, và tiếp tục lấy kết quả phép chia (chia nguyên div) chia tiếp cho hệ cơ số đển khi phần dư bằng 0. Viết các số dư theo thứ tự kết quả sau viết trước ta được số ở hệ cơ số cần đổi. Sau đó bạn viết tiếp một chương trình con để kiểm tra tính đối xứng. Code: Function doixung(so:string):boolean; Việc này đơn giản do số đưa vào chuỗi rồi chỉ cần kiểm tra tính đối xứng của chuôi thôi. Còn việc ghi ra file thì đơn giản rôi. thay đổi nội dung bởi: thienthan, 25-04-2008 lúc 08:57.*

25-04-2008, 12:47	#15
giangmeo Búa Gỗ Đôi Tham gia: Mar 2008 Bài: 44 VZD: 828 Điểm: 0/0 bài viết	duyệt chưa phải là cách hay nhất đâu có lẻ nên dùng chuổi

Ðiều Chỉnh
Tạo trang in Email trang này
Xếp Bài
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode