Chuyển đến nội dung chính

ĐỀ THI CHỌN HỌC SINH GIỎI LỚP 9 CẤP HUYỆN NĂM HỌC 2015-2016 Huyện Tây Hòa

ĐỀ THI CHỌN HỌC SINH GIỎI LỚP 9 CẤP HUYỆN  NĂM HỌC 2015-2016
Huyện Tây Hòa

Bài 1: (6đ )Số nguyên tố
Viết chương trình cho phép nhập số tự nhiên N từ bàn phím.
yêu cầu:
a.       Cho biết số tự nhiên N có phải là số nguyên tố không?
b.      Cho biết số nguyên tố bé nhất lớn hơn N
c.       số song tố là số nguyên tố mà tổng các chữ số của nó cũng là một số nguyên tố. Hãy in ra các số song tố không lớn hơn N. Thông báo không có khi không tìm thấy.
ví dụ:
dữ liệu vào
dữ liệu ra
N=25
a.       So N khong la so nguyen to
b.      so nguyen to be nhat lon hon n la:29
c.       cac so song to khong lon hon n la: 2;3;5;7;11;23
N=31
a.       So N  la so nguyen to
b.      so nguyen to be nhat lon hon n la:37
c.       cac so song to khong lon hon n la: 2;3;5;7;11;23;29
N=1
a.       So N  khong la so nguyen to
b.      So nguyen to be nhat lon hon n la:2
c.       cac so song to khong lon hon n la: KHONG CO

Bài 2:(8đ) Tam giác
Viết chương trình cho phép nhập số nguyên N từ bàn phím là chu vi của một tam giác có các cạnh đều là các số nguyên.
Yêu cầu:
a.       In ra số đo 3 cạnh của tam giác. Thông báo KHONG nếu không có tam giác có  cạnh là số nguyên và có chu vi là N.
b.      Trong các tam giác trên (câu a) có tam giác vuông không?
c.       Trong các tam giác trên (câu a) hãy cho biết diện tích của tam giác có diện tích lớn nhất?

dữ liệu vào
dữ liệu ra
Giải thích
N=3
a)      (1,1,1)
b)      KHONG
c)      0,43
có 1 tam giác
Tam giác (1,1,1) không vuông
0,43 là diện tích lớn nhất của tam giác
N=4
a)      KHONG
b)      KHONG
c)      0,0
khong có tam giác có cạnh nguyên nào có chu vi bằng 4.
không có tam giác nên không có tam giác vuông
không có tam giác nên xuất 0,0
N=7
a)      (1,3,3);(2,2,3)
b)      KHONG
c)      1.98
Có 2 tam giác
không có tam giác vuông trong 2 tam giác trên
1.98 là diện tích lớn nhất
N=12
a)      (2,5,5); (3,4,5); (4,4,4)
b)      CO
c)      6.93
Có 3 tam giác
có 1 tam giác vuông là (3,4,5)
6.93 là diện tích lớn nhất
Bài 3: (6đ) Ước số
Viết chương trình cho phép nhập số nguyên dương N từ bàn phím
yêu cầu:
a)      IN ra tất cả các số ước của số nguyên dương N.
b)      In ra số ước số nguyên dương của số N
c)      In ra số M nhỏ nhất thỏa 0<M<=N có nhiều số ước nguyên dương nhất.
dữ liệu vào
dữ liệu ra
Nhâp so N: 10

cac uoc cua N la: 1;2;5;10
So uoc cua N la:4
so M la:6
Nhap so N:30
cac uoc cua N la: 1;2;3;5;6;10;15;30
So uoc cua N la:8
so M la:24
Nhap so N:0
Nhap so n: (yêu cầu nhập lại số N)


Nhận xét

Bài đăng phổ biến từ blog này

Tam giác số (Pascal)

TAM GIÁC SỐ  (Câu 4. Hội thi Tin Học Trẻ Phú Yên lần thứ XIX - năm 2016)                              7                          3       8                      8      1       0                   2     7        4       4                 4    5      2       6       5 Cho một tam giác gồm các số nguyên không âm (xem hình trên). Hãy viết chương trình tính tổng lớn nhất của các số nằm trên lộ trình từ đỉnh xuống: - Tại mỗi bước đi, lộ trình có thể đi xuống phía bên trái hoặc xuống phía bên phải. - Số hàng trong tam giác lớn hơn...

SỐ CHÍNH PHƯƠNG (PASCAL)

SỐ CHÍNH PHƯƠNG (PASCAL) Số chính phương là số  mà nó là căn bậc 2 của một số nguyên nào đó. ví dụ: 4,9,16,25,.... là các số chính phương;  có nhiều cách để xác định một số có phải là số có phải số chính phương hay không; cách đơn giản nhất  ta dùng lệnh if (sqr (round(sqrt(A))))=A then write('A la so chinh phuong')                                              else  write('A khong la so chinh phuong'); Ghi chú: sqrt : hàm tính căn bậc 2 sqr: hàm tính bình phương round: hàm làm tròn số - Cách khác' if frac(sqrt(A))=0 then  write('A la so chinh phuong')                                              else  write('A khong la so chinh phuong');

DÃY ĐAN DẤU TRONG PASCAL

DÃY ĐAN DẤU TRONG PASCAL Dãy đan dấu là dãy không có 2 phần tử cạnh nhau có dấu giống nhau. ví dụ: -2 4 -9 5 -23 8 là dãy đan dấu Thủ tục kiểm tra dãy đan dấu trong dãy số: procedure dandau; var i,j:integer;     kt:boolean; begin kt:=true; for i:=1 to N-1 do                 begin                 j:=i+1;                 if a[i] *a[j] >0 then kt:=false;                 end; If kt=true then write('Day A la day dan dau') else write('Day A khong phai day dan dau'); end;