intTypePromotion=1
zunia.vn Tuyển sinh 2024 dành cho Gen-Z zunia.vn zunia.vn
ADSENSE

Đề thi học kì 2 môn Tin học 8 năm 2017-2018 có đáp án - Trường THSC Sa Nhơn

Chia sẻ: Thiên Thiên | Ngày: | Loại File: PDF | Số trang:2

77
lượt xem
2
download
 
  Download Vui lòng tải xuống để xem tài liệu đầy đủ

Tham khảo Đề thi học kì 2 môn Tin học 8 năm 2017-2018 có đáp án - Trường THSC Sa Nhơn để bổ sung kiến thức, nâng cao tư duy và rèn luyện kỹ năng giải đề chuẩn bị thật tốt cho kì thi học kì sắp tới các em nhé! Chúc các em thi tốt!

Chủ đề:
Lưu

Nội dung Text: Đề thi học kì 2 môn Tin học 8 năm 2017-2018 có đáp án - Trường THSC Sa Nhơn

PHÒNG GD&ĐT SA THẦY<br /> TRƯỜNG THCS SA NHƠN<br /> <br /> KIỂM TRA CHẤT LƯỢNG HỌC KÌ II<br /> Năm học 2017 - 2018<br /> Môn: Tin học 8 Tiết ppct: 70<br /> Thời gian: 45 phút (Thực hành trên máy)<br /> Ngày kiểm tra: /5 /2018<br /> <br /> Điểm<br /> <br /> Lời phê của thầy (cô) giáo:<br /> <br /> Họ và tên:..............................<br /> Lớp: ......................<br /> <br /> ĐỀ THỰC HÀNH:<br /> Câu 1: (5.0 điểm) Sử dụng biến mảng viết chương trình nhập vào một dãy số gồm N<br /> số nguyên từ bàn phím. In ra màn hình giá trị lớn nhất của dãy số đó.<br /> <br /> Câu 2: (5.0 điểm) Viết chương trình tính tổng sau: S=1+ 2 + 3 +...+ n sao cho tổng S<br /> nhỏ nhất >500 (với n là số nguyên được nhập vào từ bàn phím).<br /> <br /> ------------------- Hết --------------------<br /> <br /> (Đề này gồm 01 trang)<br /> <br /> PHÒNG GD&ĐT SA THẦY<br /> TRƯỜNG THCS SA NHƠN<br /> <br /> KIỂM TRA CHẤT LƯỢNG HỌC KÌ II<br /> Năm học 2017 - 2018<br /> Môn: Tin học Lớp: 8<br /> Thời gian: 45 phút (Thực hành trên máy)<br /> Ngày kiểm tra: /05/2018<br /> <br /> ĐÁP ÁN, BIỂU ĐIỂM<br /> Câu<br /> <br /> 1<br /> (5.0 đ)<br /> <br /> 2<br /> <br /> Đáp án<br /> program Max;<br /> uses crt;<br /> Var<br /> i, n, s, Max: integer;<br /> A: array[1..100] of integer;<br /> Begin<br /> clrscr;<br /> write('Hay nhap do dai cua day so, N = '); readln(n);<br /> writeln('Nhap cac phan tu cua day so:');<br /> For i:=1 to n do<br /> Begin<br /> write('a[',i,']=');<br /> readln(a[i]);<br /> End;<br /> Min:=a[1];<br /> For i:=2 to n do<br /> Begin<br /> if Max
ADSENSE

CÓ THỂ BẠN MUỐN DOWNLOAD

 

Đồng bộ tài khoản
6=>0