Cũ 04-01-2010, 12:30   #1 (permalink)
Bài tập Lập trình PASCAL
YoYo-CiCi YoYo-CiCi đang offline 04-01-2010, 12:30

Để chuẩn bị cho Hội khỏe phù Đổng, nhà trường tổ chức cuộc thi điền kinh chạy 100m, mọi HS đều có quyền đăng ký thi. Mỗi ng dự thi có một phiếu đăng ký như sau:

Họ tên ( Xâu khôgn quá 35 kí tự)
Nam/ Nữ ( 1 kí tự: 1- Nam, 0- Nữ)
Lớp ( 3 kí tự)
Thời gian chạy (gy) ( Số thực)
------- Bản ghi nạp vào máy---------

Sau khi chạy tới đích, thời gian chạy sẽ đc ghi vào phiếu đăng kí và các phiểu này đc nhập vào máy tính để xử lí. Các lớp có từ 3 HS nam(nữ) tham dự trở lên đc tính thành tích đồng đội nam ( nữ). Thành tích thời gian đồng đội là trung bình thời gian của các HS trong lớp.

a) Hãy xây dựng kiểu dữ liệu và khai bao các biến thích hợp
b) Viết đoạn chương trình tính:
- Tổng số HS dự thi, số HS nam, số HS nữ
- Danh sách các HS nam về nhất, bao gồm Họ và tên, Lớp
- Danh sách các HS nữ về nhất, bao gồm Họ và tên, Lớp
- Danh sách các lớp có từ 3 HS nam tham dự trở lên ( để tính điểm đồng đội)
- Danh sách các lớp có từ 3 HS nữ tham dự trở lên ( để tính điểm đồng đội)
- Danh sách lớp đứng thứ nhất đồng đội nam
- Danh sách lớp đứng thứ nhất đồng đội nữ


Mọi ng xem giup em bai nay voi ....

Thay đổi nội dung bởi: YoYo-CiCi, 04-01-2010 lúc 12:34.

 
Avatar của YoYo-CiCi
YoYo-CiCi
Cựu học sinh
Tham gia ngày: Nov 2008
Đến từ: Cánh đồng cỏ
Bài gửi: 944
Cảm ơn: 446
Được cảm ơn 334 lần trong 133 bài viết
Tâm trạng: DaiKhoLam
Lần đọc: 1293
Trả lời với Trích dẫn
Những thành viên sau đã cảm ơn YoYo-CiCi về bài viết:
potternguyen (04-01-2010)
Cũ 04-01-2010, 17:39   #2 (permalink)
Lệ Kưng
Tan Nát Một Trái Tim...
 
Avatar của Lệ Kưng
 
Tham gia ngày: Jan 2009
Đến từ: Đâu Còn Lâu Mới Nói :-P
Bài gửi: 2,564
Cảm ơn: 526
Được cảm ơn 687 lần trong 372 bài viết
Tâm trạng: DaiKhoLam
Mặc định

Sư phụ Thế Anh đâu ạ
__________________
Mong Manh.Luv...
Lệ Kưng đang offline   Trả lời với Trích dẫn
Cũ 04-01-2010, 18:51   #3 (permalink)
potternguyen
Bàn viên
 
Avatar của potternguyen
 
Tham gia ngày: Feb 2009
Đến từ: Trại Thương Điên
Bài gửi: 2,287
Cảm ơn: 436
Được cảm ơn 731 lần trong 387 bài viết
Tâm trạng: DangBuon
Gửi tin nhắn qua Yahoo tới potternguyen Gửi tin nhắn qua Skype™ tới potternguyen
Mặc định

Họ tên ( Xâu khôgn quá 35 kí tự) a[35]
Nam/ Nữ ( 1 kí tự: 1- Nam, 0- Nữ)
Lớp ( 3 kí tự) char[3]
Thời gian chạy (gy) ( Số thực) float

Thông cảm anh học C không học pascal
ý tưởng thì giống nhau nhưng cách thể hiện nó khác nhau nên ... viết C ra liệu có chuyển đc về pascal ko và có hiểu ko là chuyện khác
__________________

Don't worry...
Be happy...

Việc khó làm nhất trong đời tôi. LÀ việc biết đặt mình vào hoàn cảnh của người khác
potternguyen đang offline   Trả lời với Trích dẫn
Cũ 04-01-2010, 22:29   #4 (permalink)
Viet-sieunhan
Bàn viên
 
Avatar của Viet-sieunhan
 
Tham gia ngày: Jan 2009
Đến từ: Đại học Bôn Ba
Bài gửi: 772
Cảm ơn: 168
Được cảm ơn 146 lần trong 101 bài viết
Tâm trạng: HoiHopQua
Gửi tin nhắn qua Yahoo tới Viet-sieunhan
Mặc định

Một môn học không áp dụng nhiều trong thực tế.
Tin học 11 ---> mù tịt
__________________
Ái tình này ai có thể vượt qua.
Vọng minh nguyệt , tâm thật thê lương.
Hận thiên cổ , nỗi đau luân hồi.
Khi nhắm mắt ai mới là kẻ si cuồng.
Thế đạo này thật vô thường.
Khiến cho người dám yêu một đời phải bi thương.
Viet-sieunhan đang offline   Trả lời với Trích dẫn
Cũ 06-01-2010, 13:07   #5 (permalink)
Doan Ha Vu
Bàn viên
 
Avatar của Doan Ha Vu
 
Tham gia ngày: Apr 2009
Đến từ: Hà Nội
Bài gửi: 50
Cảm ơn: 123
Được cảm ơn 44 lần trong 15 bài viết
Mặc định

Bài 1 - Giới thiệu chương trình Pascal
Bài 2 - Cấu trúc chương trình Pascal
Bài 3 - Kiểu dữ liệu cơ sở
Bài 4 - Câu lệnh đơn

Giáo trình pascal : Stupid cupid
__________________
nắng tắt mà người không đến
anh ngồi rót biển vào chai
Doan Ha Vu đang offline   Trả lời với Trích dẫn
Cũ 06-01-2010, 14:48   #6 (permalink)
nh0c_9x
Bàn viên
 
Avatar của nh0c_9x
 
Tham gia ngày: Mar 2009
Đến từ: Hải Phòng
Bài gửi: 81
Cảm ơn: 25
Được cảm ơn 44 lần trong 18 bài viết
Gửi tin nhắn qua Yahoo tới nh0c_9x
Mặc định

A có học rồi nhưng k nhớ lắm
nh0c_9x đang offline   Trả lời với Trích dẫn
Cũ 08-01-2010, 21:27   #7 (permalink)
dangki12c1
Bàn viên
 
Avatar của dangki12c1
 
Tham gia ngày: Dec 2008
Đến từ: HP
Bài gửi: 93
Cảm ơn: 31
Được cảm ơn 50 lần trong 25 bài viết
Tâm trạng: ThoNgay
Mặc định

học bản ghi chưa em.Dùng bản ghi để nhập dữ liệu đầu vào gồm các thuộc tính họ tên nam nữ vv.sau đó tạo mấy cái biến đếm mà đếm.Dùng If then kiểm tra nam nữ rồi tăng biến đếm.sử dụng thuật toán tìm max để tìm ra thằng có thành tích cao nhất.ví dụ nhé.Khai bản ghi là
type
HS =record
hoten :string[35];
lop:string[3];
thoigian:integer;
gioitinh:integercai nay nhap 0 vs 1 )
thế xong vào bài khai báo 1 cái array với kiểu dữ liệu là bản ghi.Nhập dữ liệu cho từng bản ghi bằng vòng lặp.vd
FOR i := 1 TO n DO
BEGIN
Write(' Họ tên : '); readln(hs[i].Hoten);
vv rồi sau đó tìm max cho trường hs.thoigian
thằng nào to nhất thì ứng với biến đếm i của nó đấy xuất ra dữ liệu của cả bản ghi hihi.
mấy cái kia dùng if then rồi tạo biến tính tổng lại so sánh.
nhìn chung là thế.Anh học visual basic nên cái này không thạo lắm.Sơ sơ như thế về mà tìm hiểu thêm.^^.Lập trình viên tương lai thì phải chịu khó lên chứ.
dangki12c1 đang offline   Trả lời với Trích dẫn
3 thành viên dưới đây đã cảm ơn dangki12c1 về bài viết này:
Lệ Kưng (09-01-2010), M®.Ziñ¶«€ñ (04-10-2010), YoYo-CiCi (09-01-2010)
Cũ 09-01-2010, 08:01   #8 (permalink)
YoYo-CiCi
Cựu học sinh
 
Avatar của YoYo-CiCi
 
Tham gia ngày: Nov 2008
Đến từ: Cánh đồng cỏ
Bài gửi: 944
Cảm ơn: 446
Được cảm ơn 334 lần trong 133 bài viết
Tâm trạng: DaiKhoLam
Gửi tin nhắn qua Yahoo tới YoYo-CiCi
Mặc định

NHỳn mấy bài thấy sợ...... CÒn hứng ji lập trình nữa..... TKS anh Thắng naz' Lần nào anh T cũng cứu em hết ak HA Ha
YoYo-CiCi đang offline   Trả lời với Trích dẫn
Cũ 16-03-2010, 13:25   #9 (permalink)
Se7en2015
Bàn viên
 
Avatar của Se7en2015
 
Tham gia ngày: Mar 2010
Bài gửi: 1
Cảm ơn: 0
Được cảm ơn 0 lần trong 0 bài viết
Mặc định

Ai giải giùm e bài này đi
Se7en2015 đang offline   Trả lời với Trích dẫn
Cũ 03-07-2010, 20:18   #10 (permalink)
empiresx2008
Bàn viên
 
Avatar của empiresx2008
 
Tham gia ngày: Jun 2010
Đến từ: HPMU
Bài gửi: 40
Cảm ơn: 24
Được cảm ơn 27 lần trong 13 bài viết
Gửi tin nhắn qua Yahoo tới empiresx2008 Gửi tin nhắn qua Skype™ tới empiresx2008
Mặc định

Trích:
Nguyên văn bởi YoYo-CiCi Xem Bài viết
Để chuẩn bị cho Hội khỏe phù Đổng, nhà trường tổ chức cuộc thi điền kinh chạy 100m, mọi HS đều có quyền đăng ký thi. Mỗi ng dự thi có một phiếu đăng ký như sau:

Họ tên ( Xâu khôgn quá 35 kí tự)
Nam/ Nữ ( 1 kí tự: 1- Nam, 0- Nữ)
Lớp ( 3 kí tự)
Thời gian chạy (gy) ( Số thực)
------- Bản ghi nạp vào máy---------

Sau khi chạy tới đích, thời gian chạy sẽ đc ghi vào phiếu đăng kí và các phiểu này đc nhập vào máy tính để xử lí. Các lớp có từ 3 HS nam(nữ) tham dự trở lên đc tính thành tích đồng đội nam ( nữ). Thành tích thời gian đồng đội là trung bình thời gian của các HS trong lớp.

a) Hãy xây dựng kiểu dữ liệu và khai bao các biến thích hợp
b) Viết đoạn chương trình tính:
- Tổng số HS dự thi, số HS nam, số HS nữ
- Danh sách các HS nam về nhất, bao gồm Họ và tên, Lớp
- Danh sách các HS nữ về nhất, bao gồm Họ và tên, Lớp
- Danh sách các lớp có từ 3 HS nam tham dự trở lên ( để tính điểm đồng đội)
- Danh sách các lớp có từ 3 HS nữ tham dự trở lên ( để tính điểm đồng đội)
- Danh sách lớp đứng thứ nhất đồng đội nam
- Danh sách lớp đứng thứ nhất đồng đội nữ


Mọi ng xem giup em bai nay voi ....

Bài này dễ thôi mà em

Cách nhập dữ liệu thì dùng bản ghi (dangki12c1 hướng dẫn qua rồi nhé)
các câu khá dễ. anh chỉ hướng dẫn câu cuối thôi

Danh sách lớp đứng thứ nhất đồng đội nam

Đầu tiên em phải lập 1 trường mục đích là tạo danh sách những lớp đc phép tính đồng đội nam(làm cách này cho sáng sủa dễ hiểu ấy mà)
Sau đó lập 1 chương trình con tìm ra các lớp có >3 người dự thi->tạo danh sách luôn
sử dụng 1 vòng lặp để tìm ra lớp nhất đồng đội nam
cách làm này sẽ rất dễ hiểu dễ viết code
dễ sửa sai nhưng hơi dài dòng tí
chịu khó nha em
empiresx2008 đang offline   Trả lời với Trích dẫn
Trả lời

Tùy chỉnh
Sắp xếp hiển thị

Quyền hạn của bạn
Bạn không thể tạo Chủ đề mới
Bạn không thể gửi Trả lời
Bạn không thể gửi Đính kèm
Bạn không thể sửa bài viết của mình

BB code đang Mở
Smilies đang Mở
[IMG] đang Mở
HTML đang Tắt
Trackbacks are Tắt
Pingbacks are Tắt
Refbacks are Tắt


Chủ đề giống nhau
Chủ đề Người gửi Chuyên mục Trả lời Bài mới
[ Gấp- Help me] Bài tập Lập trình pascal Smile Tin học cơ bản 2 22-06-2010 09:29
[Tin học 11] Bài tập lập trình Pascal - BTH giải quyết để mọi người học hỏi nhé Nhóc Ban Khoa học tự nhiên 3 15-10-2009 21:26

 

THPT BẠCH ĐẰNG
Diễn đàn THPT LTK
THPT PVN
Diễn đàn học sinh/ cựu học sinh Trường PTTH Quang Trung - Hải Phòng
Múi giờ GMT +7. Hiện tại là 10:26.
Phát triển từ 03/11/2008 | Điều hành: HoangPhu.Vn.
Truy cập, sử dụng website này nghĩa là bạn đã chấp nhận Quy định của Diễn đàn!