ĐỀ Thi HỌc Sinh GiỎi Tin HỌc CẤp TỈnh VÒng 1 NĂm HỌc 2007-2008
Bài 1: (5 điểm) Cho một lưới gồm n ô vuông được đánh dấu thứ tự từ 1 đến n. ban đầu mỗi ô vuông không chứa hòn sỏi nào, người ta bỏ vào cá cô vuông những hòn sỏi theo k lần qui tắc sau:
Mỗi lần bỏ thêm vào ô vuông thứ nhất, ô vuông thứ 2 mỗi ô đúng 1 hòn sỏi, từ ô vuông thứ 3 trở đi số hòn sỏi bỏ thêm vào bẳng tổng số hòn sỏi của các ô vuông phía trước.
Yêu cầu : Nhập vào số tự nhiên n, k, m (m ≤ n) trong đó n là số ô vuông của lưới, k là số lần thực hiện qui tắc. Hãy cho biết ô vuông thứ m có bao nhiêu hòn sỏi?
Ví dụ : Có n = 5, k = 3, m= 4. Thực hiện k lần qui tắc ta có
k=1 1 1 2 4 8
k=2 2 2 6 14 32
k=3 3 3 12 32 82
Với k=1 số hòn sỏi của từng ô vuông như trên
Với k=2 số hòn sỏi của từng ô vuông như trên
Với k=3 số hòn sỏi của từng ô vuông như trên
Ta được ô vuông thứ m=4 có số hòn sỏi là 32
Bài 2: (5điểm) Cho chuỗi S có n kí tự, để chọn kí tự đại diện cho chuỗi S người ta thực hiện qui tắc sau:
- Đếm kí tự liên tục theo chiều từ trái sang phải, hết chuỗi đếm tiếp kí tự từ đầu
- Đầu tiên kí tự thứ nhất đếm 1, đếm liên tục đến 5 bỏ kí tự tại vị trí này ra khỏi chuỗi S. Kí tự kế tiếp đếm 1, đếm đến 6 bỏ kí tự tại vị trí này ra khỏi chuỗi S. Kí tự kế tiếp đếm 1, đếm đến 5 bỏ kí tự tại vị trí này ra khỏi chuỗi S. Kí tự kế tiếp đếm 1, đếm đến 6 bỏ kí tự tại vị trí này ra khỏi chuỗi S.
… tiếp tục đến khi chuỗi còn đúng 1 kí tự, kí tự này là kí tự đại diện cho chuỗi S.
Yêu cầu : Nhập vào số tự nhiên n là số kí tự của chuỗi S. Hãy cho biết kí tự đại diện của chuỗi S là kí tự thứ mấy trong chuỗi S ban đầu.
Ví dụ: Nhập n=4 giả sử chuỗi S= ‘abcd’
Đầu tiên từ kí tự thứ nhất là a đếm 1, đếm đến 5 là kí tự a, bỏ kí tự này là kí tự a ra khỏi chuỗi S ta được S= ‘bcd’.
Kí tự kế tiếp là b đếm 1, đếm đến 6 là kí tự d, bỏ kí tự này là kí tự d ra khỏi chuỗi S ta có S= ‘bc’.
Kí tự kế tiếp là b đếm 1, đếm đến 5 là kí tự b, bỏ kí tự này là kí tự b ra khỏi chuõi S ta có S= ‘c’.
Vậy kí tự đại diện của chuỗi S là kí tự thứ 3 của chuỗi
__________________
Khi con cảm thấy muốn buông xuôi tất cả thì đừng bao giờ ngồi xuống.Vì một khi đã ngồi xuống con sẽ không đứng dậy được nữa.Lúc đó chính là lúc sắp chết đấy.Khi cảm thấy muốn buông xuôi tất cả là lúc càng cần phải đứng dậy.Đó là cuộc chiến đấu cuối cùng.....cuộc chiến đấu với chính trái tim mình
Ðề: ĐỀ Thi HỌc Sinh GiỎi Tin HỌc CẤp TỈnh VÒng 1 NĂm HỌc 2007-200
Đề thi tỉnh vòng 1 thường ... dễ ngoài sức tưởng tượng, người đậu vòng 1 coi như là HSG cấp tỉnh, nhưng để được thi HSGQG thì phải qua vòng 2, mà vòng này thường khoai hơn vòng 1 nhiều lần.
__________________ tặng nhau nhé tim nghe hồn nhiên
Ðề: ĐỀ Thi HỌc Sinh GiỎi Tin HỌc CẤp TỈnh VÒng 1 NĂm HỌc 2007-200
Bài số 2:
Code:
const Nmax=1000;
type
st=array[1..Nmax] of integer;
var index,len,n,i:integer;
s:st;
procedure demx(var s:st;x:integer);
var i:integer;
begin
if len>1 then
begin
{for loop}
for i:=1 to x-1 do
if index >= len then index:=1
else
begin
inc(index)
end;
{end for loop}
{delete a member at index from s}
if index < len then
for i:=index to len-1 do
s[i]:=s[i+1]
else
index:=1;
{decrease len by 1}
dec(len);
end
end;
{end demx}
begin
index:=1;
write('n=');
readln(n);
if n > Nmax then
write('Loi: Nhap n khong lon hon ',Nmax)
else
begin
if n <= 0 then
write('Khong xet khi n khong duong')
else
if n = 1 then
write('Ky tu dai dien la ky tu duy nhat cua chuoi')
else
begin
for i:=1 to n do
s[i]:=i;len:=n;
while len > 1 do
begin
demx(s,5);
demx(s,6)
end;
write(s[1]);
readln
end
end
end.
__________________ Necessity is the mother of in(ter)vention.
Speak softly & carry a big stick. My Technical Blog
Ðề: ĐỀ Thi HỌc Sinh GiỎi Tin HỌc CẤp TỈnh VÒng 1 NĂm HỌc 2007-200
Bài 1:
Code:
const
MAX=1000;
type
kieuluoi=array[1..MAX] of integer;
var luoi:kieuluoi;
n,k,m,i:integer;
s:integer;
procedure bosoi;
var i:integer;
begin
if n>=1 then
begin
inc(luoi[1]);
s:=luoi[1];
if n>=2 then
begin
inc(luoi[2]);
inc(s,luoi[2]);
if n>2 then
for i:=3 to n do
begin
inc(luoi[i],s);
inc(s,luoi[i])
end
end
end
end;
begin
readln(n,k,m);
if m > n then
writeln('m phai nho hon n')
else
begin
for i:=1 to n do
luoi[i]:=0;
for i:=1 to k do
bosoi;
write(luoi[m]);
readln
end;
end.
__________________ Necessity is the mother of in(ter)vention.
Speak softly & carry a big stick. My Technical Blog
Ðề: ĐỀ Thi HỌc Sinh GiỎi Tin HỌc CẤp TỈnh VÒng 1 NĂm HỌc 2007-200
Trích:
Nguyên văn bởi DeMen
Đề thi tỉnh vòng 1 thường ... dễ ngoài sức tưởng tượng, người đậu vòng 1 coi như là HSG cấp tỉnh, nhưng để được thi HSGQG thì phải qua vòng 2, mà vòng này thường khoai hơn vòng 1 nhiều lần.
Hình như cái này hơi bị đúng đó, khuyến khích mấy em mà. Đề này chỉ chú ý một chút là làm được hà. Anh Lộc đọc từ từ đừng có "nhìn" không như thế chứ, hèn chi muốn nổ đom đóm.