| Đề thi học Kỳ II (tham khảo) | |
|
|
Tác giả | Thông điệp |
---|
myheart Teacher
Tổng số bài gửi : 300 Join date : 22/11/2008
| Tiêu đề: Đề thi học Kỳ II (tham khảo) Wed Apr 22, 2009 7:53 pm | |
| TrườngTHCS Nguyễn Khuyến
Họ và tên: ……………………….. lớp 8:\.. ĐỀ KIỂM TRA KH II
Thời gian: 45 phút Đề I
1. Phần trắc nghiệm, tự luận: (2đ)
Chọn câu đúng và đánh dấu × trước câu chọn đúng
a. Công dụng và ý nghĩa của lệnh Writeln; khi viết trong tập tin *.pas
a) Là lệnh xuất dữ liệu ra màn hình hoặc vào file
b) Lệnh đưa con trỏ xuống 1 dòng c) Lệnh dừng chương trình chờ ấn 1 phím bất kỳ d) Cả 3 ý trên đều đúng b. Lệnh Delay(200); dùng để làm gì trong chương trình Turbo pascal?
……………………………………………………………………………………………. c. Lệnh readln; và readln(n) khác nhau ở điểm nào? ……………………………………………………………………………………………. d. Những câu lệnh sau câu nào là câu lệnh đúng (không có lỗi ) trong ngôn ngữ lập trình pascal: a) X:=10; If X>= 10 then writeln(' Đó là số lớn hơn hoặc =10 ') b) X:=5; If X>= 10 then writeln(' Đó là số 10 ') else writeln(' Đó là số nhỏ hơn 10 '); c) X:=9 For i:= 10 downto X do d) X:=10; If X>= 10 then writeln(' Đó là số 10 ');
* Khai báo: (2đ) 2. Với bài toán nhập vào 1 mảng số thực có n phần tử (0<50). Tìm phần tử lớn nhất trong mảng đó. Hãy khai báo biến:
Viết chương trình: (2đ) 3. Viết chương trình nhập vào 1 số nguyên. Nếu nhập vào số 1 : in ra câu chào Ông, nhập vào số 2 : in ra câu chào Bà, nhập vào số 3 : in ra câu chào Thầy cô, nhập vào số bất kỳ: in ra câu chào mọi người
4. Viết thuật toán: (2đ)
Viết thuật toán để giải bài toán sau:
Input: một dãy số dương a[a‑1, a2, a3, ...an]
Output: Trung bình cộng các số dương?
5. Viết chương trình
Chọn 1 trong 2 bài sau: (2 đ)
a) Viết chương trình nhập vào 1 mảng ký tự, và nhập vào 1 ký tự X bất kỳ từ bàn phím. Kiểm tra xem có bao nhiêu phần tử trong mảng giống ký tự X
b) Viết chương trình nhập vào 1 mảng số nguyên, tìm xem có bao nhiêu phần tử = 0, có bao nhiêu phần tử < 0. Chú ý: Đây là đề tham khảo nên không có giá trị kiểm tra
Được sửa bởi myheart ngày Wed Apr 22, 2009 7:57 pm; sửa lần 1. | |
|
| |
eso Du Khách
Tổng số bài gửi : 11 Join date : 08/02/2009
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Wed Apr 22, 2009 9:59 pm | |
| (hphong) 1) a/c b/Ngưng làm công việc của chương trình trong 200/18.2 giây c/readln; là nhận lện để đưa con trỏ xuống 1 dòng. readln(n); là đọc số n và xuống dòng sau khi đọc. d/ b,d đúng 2)var a:array[1..50] of real; n:byte;maximum:real; 3) uses crt; var n:integer; begin clrscr; write('nhap n: ');readln(n); if (n=1) then writeln('hello sir') else if (n=2) then writeln('hello madam') else if (n=3) then writeln('hello teacher') else writeln('hello everyone'); readln; end. 4)Nhập n ---> nhập A[i] với i=1-->n. ans=0. i =1-->n --> ans=ans+A[i]. ans=ans/n; 5) a/uses crt; var s:string; x:char; i,ans:integer; begin clrscr; write('nhap xau: ');readln(s); writeln('nhap ki tu X: ');readln(x); ans:=0; for i:=1 to length(s) do if (s[i]=x) then inc(ans); writeln('co ',ans,' ki tu', x ,' trong xau'); readln; end. b)uses crt; var a:array[1..1000] of integer; ans1,ans2,i,n:integer; begin clrscr; write('nhap do dai day so: ');readln(n); for i:=1 to n do begin write(a[',i,']= ');readln(a[i]); end; ans1:=0; ans2:=0; for i:=1 to n do begin if (a[i]=0) then inc(ans1); if (a[i]<0) then inc(ans2); end; writeln('co ',ans1,' so 0 trong day'); writeln('co ', ans2 ,' so be hon 0 trong day'); readln; end.
Signature : Windy | |
|
| |
Gorse160495 Moderator
Tổng số bài gửi : 494 Join date : 22/11/2008 Age : 29 Đến từ : Qúa Khứ, Hiện Tại và Tương Lai
| |
| |
Gorse160495 Moderator
Tổng số bài gửi : 494 Join date : 22/11/2008 Age : 29 Đến từ : Qúa Khứ, Hiện Tại và Tương Lai
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Thu Apr 23, 2009 6:33 pm | |
| Bài 4 phía trên nhìn rối mắt quá >"< Không biết bài này có đúng ko nhưng cứ up lên cho mọi người coi, có gì chỉ để sửa lun.
4) B1 : n <- bàn phím đọc a[i..n] <- bàn phím; tong:=0; dem:=0 B2 : Nếu i > n -> B5 B3 : Nếu a[i]>0 thì tong :=tong+a[i]; dem:=dem+1 B4 : TBC:=tong/dem -> B2 B5 : In kết quả TBC B6 : Kết thúc chương trình. | |
|
| |
eso Du Khách
Tổng số bài gửi : 11 Join date : 08/02/2009
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Thu Apr 23, 2009 10:55 pm | |
| (hphong) ừ anh gõ nhầm í em, srrr
Signature : Windy | |
|
| |
red_apple Dân Thường Trú
Tổng số bài gửi : 59 Join date : 06/12/2008 Đến từ : hội dê^^
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Fri Apr 24, 2009 9:06 am | |
| củm ơn myheart zvà bạn gorse nha hy vọng mình sẽ thi tốt vào chìu nay | |
|
| |
Nhóc Thổ Địa Công
Tổng số bài gửi : 106 Join date : 22/11/2008 Age : 28 Đến từ : Một nơi... chỉ có riêng mình tôi...
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Fri Apr 24, 2009 12:53 pm | |
| Em nghỹ phần 1 câu b là a+b đúng chứ nhỉ?
Có ai giải thích giúp em ko?
__Nhóc__ | |
|
| |
nhokvip7/6 Vệ Sĩ
Tổng số bài gửi : 386 Join date : 10/12/2008 Age : 28 Đến từ : tập đoàn 7/6 vipro
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Sat Apr 25, 2009 9:06 pm | |
| có đề 7 thì thầy post lên luôn đi thầy. để có gì em tham khảo tí | |
|
| |
lovecandy1995 Dân Tạm Trú
Tổng số bài gửi : 42 Join date : 19/02/2009 Age : 28 Đến từ : cộng đồng 83 siu quậy
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) Sun Apr 26, 2009 4:49 pm | |
| Thầy ơi không có đề 2 ah? One-line. Type TV không dấu. Hai tội đó đủ để del bài và cảnh cáo. Tuy nhiên là thắc mắc chính đáng nên sẽ type lại và để nguyên.
Cleo nhân hậu :"> | |
|
| |
Sponsored content
| Tiêu đề: Re: Đề thi học Kỳ II (tham khảo) | |
| |
|
| |
| Đề thi học Kỳ II (tham khảo) | |
|