Trong đó: - biến đếm, giá trị đầu, giá trị cuối phải thuộc kiểu số nguyên.. - kiểu dữ liệu thuộc kiểu số nguyên hoặc số thực.[r]
(1)PHÒNG GD&ĐT THỊ XÃ NINH HÒA CỘNG HÒA XÃ HỘI CHỦ NGHĨA VIỆT NAM TRƯỜNG THCS LÊ HỒNG PHONG Độc lập – Tự – Hạnh phúc
ĐỀ CƯƠNG ÔN TẬP KIỂM TRA HỌC KỲ II NĂM HỌC 2019 - 2020 MÔN TIN LỚP (THỰC HÀNH)
I Lý thuyết
- Ôn cú pháp câu lệnh : câu lệnh lặp for…to…do, câu lệnh lặp While…do. - Ôn cách khai báo biến mảng, sử dụng biến mảng chương trình
* Cú pháp câu lệnh lặp for…to…do:
Trong đó: - biến đếm, giá trị đầu, giá trị cuối phải thuộc kiểu số nguyên - giá trị đầu giá trị cuối
- Số vòng lặp thực hiện: giá trị cuối-giá trị đầu +1 * Cú pháp câu lệnh lặp chưa biết trước số lần lặp While…do: Trong đó: - điều kiện phép so sánh
- câu lệnh câu lệnh đơn ghép * Cách khai báo biến mảng:
Trong đó: - số đầu , số cuối thuộc kiểu số nguyên; số đầu số cuối - kiểu liệu thuộc kiểu số nguyên số thực
II Bài tập
Bài 1: Viết chương trình nhập vào mảng N số nguyên từ bàn phím (N50) Xuất hình tổng số nguyên chẵn nhập vào
Gợi ý:
Program Tong_so_chan;
Var a: array[1 50] of integer; i, N, tong: integer;
Begin
Write(‘Nhap vao N so nguyen , N =’); readln(N); For i:=1 to N
Begin write(‘a[‘,i,’]=’); readln(a[i]); end; tong:=0;
For i:=1 to N
If a[i] mod = then tong:= tong + a[i];
Writeln (‘Tong cac so nguyen chan duoc nhap vao la ’, tong ); Readln
End
Bài 2: Viết chương trình nhập vào mảng N số ngun từ bàn phím (N50) Xuất hình tích số nguyên lẻ nhập vào
Gợi ý:
Program Tich_so_le;
Var a: array[1 50] of integer;
for < biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>;
while < điều kiện> <câu lệnh>;
(2)i, N, tich: integer; Begin
Write(‘Nhap vao N so nguyen , N =’); readln(N); For i:=1 to N
Begin write(‘a[‘,i,’]=’); readln(a[i]); end; tich:=1;
For i:=1 to N
If a[i] mod = then tich:= tich * a[i];
Writeln (‘Tich cac so nguyen le duoc nhap vao la ’, tich ); Readln
End
Bài 3: Viết chương trình nhập vào mảng N số thực (N50) từ bàn phím Tìm số nhỏ số nhập vào in kết hình
Gợi ý:
program Tim_Min; uses crt;
var N,i:integer; Min:real; a:array[1 50] of real; begin
write('Nhap dai cua day so, N='); readln(N); for i:=1 to N
begin
write('a[',i,']='); readln(a[i]); end;
Min:=a[1]; for i:=1 to N
if a[i]<Min then Min:=a[i];
writeln('So nho nhat cac so nhap vao la:', Min); readln
end
Bài 4: Viết chương trình nhập số nguyên từ bàn phím nhập phải số bé dừng In hình tổng số nhập
Gợi ý:
program Tinh_tong; uses crt;
var n,i,dem,tong: integer; a: array [1 100] of integer; begin
clrscr;
n:=0; dem:=0; while n>=0 begin
write('Nhap so n= '); readln(n); dem:=dem+1;
a[dem]:=n; end;
tong:=0;
(3)write (‘ Tong cac so da nhap la ’, tong); readln
end
III Đề kiểm tra mẫu
Câu 1: Viết chương trình nhập vào mảng N số nguyên từ bàn phím Xuất hình tổng số ngun chẵn nhập vào (7,00 điểm)
Câu 2: Em dịch sửa lỗi chương trình (nếu có) (2,00 điểm) Câu 3: Em chạy chương trình kiểm tra kết (1,00 điểm)
Lưu với tên: Tên_lớp_HKII(19_20) (Ví dụ: Chi_81_HKII(19_20) ) HẾT