Viết chương trình nhập họ tên của 50 học sinh. xuất ra màn hình tên của 50 học sinh đó

Trường THCS-THPT ĐINH THIỆN LÝ                                                              TIN HỌC 11

BÀI TẬP PASCAL CHƯƠNG IV

KIỂU MẢNG, KIỂU XÂU, KIỂU BẢN GHI

ĐỀ BÀI: HS chọn 1 trong các bài sau:

Bài 1:

Để chuẩn bị cho Hội khỏe Phù Đổng, trường Đinh Thiện Lý tổ chức cuộc thi điền kinh chạy 100m, mọi học sinh đều có quyền đăng ký thi, mỗi người dự thi có 1 phiếu đăng ký gồm:

·        Họ tên: không quá 35 ký tự

·        Giới tính: 3 ký tự:nam hoặc nữ

·        Lớp: 4 ký tự

·        Thời gian chạy(giây): số thực

Sau khi chạy về đích, thời gian chạy sẽ được ghi vào phiếu và được nhập vào máy tính để xử lý.

a)     Hãy xây dựng kiểu dữ liệu và khai báo các biến thích hợp

b)     Viết chương trình nhập vào số thí sinh dự thi, thông tin và thành tích từng thí sinh, tính:

·        Xuất ra thông tin của tất cả các thí sinh

.   Số học sinh nam dự thi, số học sinh nữ dự thi

·        Danh sách các học sinh nam dự thi, bao gồm họ tên, lớp

·        Danh sách các học sinh nữ dự thi, bao gồm họ tên, lớp

. Tìm học sinh chạy nhanh nhất (không kể là nam hay nữ), thông báo ra màn hình họ tên, lớp và thành tích của thí sinh đó.

Bài 2: Kết quả kiểm tra sức khỏe học sinh trường Đinh Thiện Lý được ghi trên phiếu có dạng:

PHIẾU KIỂM TRA SỨC KHỎE

Lớp: …: tối đa 4 ký tự

Họ và tên:... tối đa 30 ký tự

Nam/Nữ:…tối đa 3 ký tự

Chiều cao: …cm (số thực)

Cân nặng:…kg (số thực)

Lập trình nhập từ bàn phím tên lớp và số học sinh trong lớp (số N), sau đó nhập kết quả của N phiếu kiểm tra sức khỏe, với mỗi phiếu chỉ cần nhập 4 trường cuối (Họ tên, Nam/nữ, chiều cao, cân nặng)

a)     Xác định kiểu dữ liệu và khai báo các biến thích hợp

b)     Viết chương trình tính và đưa ra màn hình các thông tin sau:

·        Chiều cao trung bình của học sinh trong lớp

·        Cân nặng trung bình của học sinh trong lớp

·        Số học sinh cao hơn chiều cao trung bình của toàn lớp

·        Số học sinh nhẹ hơn mức cân nặng trung bình của toàn lớp.

Bài 3: Viết chương trình quản lý sách ở thư viện trường Đinh Thiện Lý gồm các trường sau:

  • Mã số sách: tối đa 10 ký tự
  • Tựa sách: tối đa 50 ký tự
  • Tên Tác giả: tối đa 30 ký tự
  • Nhà Xuất bản: tối đa 30 ký tự
  • Năm xuất bản: số nguyên.

            a/ Nhập vào kho sách của thư viện (nhập số lượng sách, nhập thông tin cho từng sách gồm tất cả các trường).

            b/ In ra màn hình tất cả các cuốn sách có trong thư viện.

         c/ Tìm một cuốn sách có mã số được nhập vào từ bàn phím. Nếu tìm thấy thì in ra màn hình thông tin đầy đủ của cuốn sách đó (tất cả các trường), ngược lại thì thông báo không tìm thấy.

           d/ Nhập vào tên tác giả, tìm và in ra màn hình tất cả các cuốn sách có cùng tác giả đó.

            d/ Nhập vào một năm nào đó, t

ìm và in ra màn hình tất cả

 các cuốn sách được xuất bản trong cùng một năm đó.

HƯỚNG DẪN LƯU BÀI VÀ NỘP BÀI

Sau từ Program ghi Lop_Maso_BAITAPCHUONG4

Lưu bài vào thư mục lớp mình trong ổ đĩa  E:\

Nộp bài vào máy GV: \\172.16.2.217

Tên file: Tên lớp-Mã số HS-BTCHUONG4.PAS 

(Ví dụ: Lop11D-12-BTCHUONG4.PAS)

Viết chương trình nhập họ tên của 50 học sinh. xuất ra màn hình tên của 50 học sinh đó
Giá trị s là bao nhiêu  (Tin học - Lớp 8)

Viết chương trình nhập họ tên của 50 học sinh. xuất ra màn hình tên của 50 học sinh đó

1 trả lời

Đặt tính rồi tính (Tin học - Lớp 5)

1 trả lời

Viết hình lục giác trong logo và hình tam giác (Tin học - Lớp 4)

3 trả lời

Sơ đồ khối là gì (Tin học - Lớp 6)

1 trả lời

Giá trị s là bao nhiêu  (Tin học - Lớp 8)

1 trả lời

Đặt tính rồi tính (Tin học - Lớp 5)

1 trả lời

Viết hình lục giác trong logo và hình tam giác (Tin học - Lớp 4)

3 trả lời

Sơ đồ khối là gì (Tin học - Lớp 6)

1 trả lời

Bài 3:

program bai3;

var hoten:string;

ST,NS:integer;

begin

write ('ho ten hoc sinh la:'); readln (hoten);

write ('nam sinh cua hoc sinh la:'); readln (NS);

ST:=2020-NS;

writeln (' so tuoi cua hoc sinh la:',ST);

readln;

end.

bài 5:

program bai5;

begin

write ('Gia tri cua bieu thuc A la', (15+5)/4-(12-8)/(3-1));

readln;

end.

Bài 4

program bai4;

var a:integer;

begin

for a:=1 to 10 do writeln ('A');

readln;

end.

  • lý thuyết
  • trắc nghiệm
  • hỏi đáp
  • bài tập sgk

Viết chương trình nhập họ tên đầy đủ trong lớp học( không quá 50 người)

Các câu hỏi tương tự

Viết chương trình nhập họ tên đầy đủ trong lớp học( không quá 50 người)