Đang tải... (xem toàn văn)
Viết – chạy và sửa lỗi nếu có chương trình: Nhập vào từ bàn phím điểm trung bình DTB, sau đó xếp loại học lực và báo ra màn hình theo yêu cầu sau: DTB>=8: xếp loại giỏi 6,5... Câu 3: Pro[r]
(1)I/ Ma trận đề Chủ đề Tự luận Câu hỏi điểm Các mức độ đánh giá Nhận biết Thông hiểu Vận dụng Câu Câu Câu 1 đ 1đ 1đ Câu Câu Câu 1đ 1đ 1đ Câu Câu Câu 1đ 1đ 2đ Tổng số 3đ 3đ 4đ II/ Nội dung đề: Câu 1: Hãy khởi động chương trình Pascal và thực các yêu cầu sau: a Viết – chạy và sửa lỗi (nếu có) chương trình thực ghi trên màn hình dòng chữ: “CHƯƠNG TRÌNH TIN HỌC LỚP LẬP TRÌNH ĐƠN GIẢN” b Lưu vào máy tính với tên: inchu.pas Câu 2: Thực yêu cầu sau: a Viết – chạy và sửa lỗi (nếu có) chương trình ghi màn hình kết tổng hai số tự nhiên a và b nhập vào từ bàn phím b Lưu vào máy tính với tên: Tong.Pas Câu 3: a Viết – chạy và sửa lỗi (nếu có) chương trình: Nhập vào từ bàn phím điểm trung bình (DTB), sau đó xếp loại học lực và báo màn hình theo yêu cầu sau: DTB>=8: xếp loại giỏi 6,5<=DTB<8:xếp loại khá 5<=DTB<6.5:xếp loại trung bình DTB<5: xếp loại yếu b Lưu vào máy tính với tên:xeploai.pas III/ Đáp án: Câu Program inchu; Begin Writeln(‘chuong trinh tin hoc lop 8’); Writeln(‘lap trinh don gian’); Readln; End Câu 2: Program tong; (2) Var a,b,c:integer; Begin Write(‘nhap vao so thu nhat a=’); readln(a); Write(‘nhap vao so thu hai b=’); readln(b); C:=a+b; Writeln(‘tong cua hai so la:’,c); Readln; End Câu 3: Program xeploai; Var dtb:real; Begin Write(‘nhap vao diem trung binh:’); readln(dtb); If dtb>=8 then writeln(‘xep loai gioi’) else If dtb>=6.5 then writeln(‘xep loai kha’) else If dtb>=5 then writeln(xep loai trung binh’) else Writeln(‘xep loai yeu’); Readln; End (3)