ĐỀ THỰC HÀNH SCRATCH

Câu 4: (3 điểm) Viết chương trình cho phép nhập một dãy gồm n số nguyên từ bàn phím và thực hiện: a. Sắp xếp và in dãy số vừa nhập theo thứ tự giảm dần. b. In ra phần tử có giá trị tuyệt đối lớn nhất trong dãy. c. In ra các số chính phương có trong dãy. II. LẬP TRÌNH BẰNG NGÔN NGỮ SCRATCH (2đ) Đề Bài: Vẽ hình vuông xoay. Yêu cầu: Nhập vào cạnh của hình vuông và số bước lệch để vẽ hình trên.

ĐỀ THI THỰC HÀNH – BẢNG B - KHỐI THCS Thời gian: 120 phút (không kể thời gian giao đề) u cầu chung: Học sinh viết chương trình ngơn ngữ Pascal Tên File chương trình đặt BAI1.PAS, BAI2.PAS, BAI3.PAS, BAI4.PAS, BAI5.SP2 lưu thư mục có tên số báo danh thí sinh ổ D:\ Ví dụ: D:\DuongthiHoa_01\BAI1.PAS I LẬP TRÌNH BẰNG NGƠN NGỮ PASCAL HOẶC C Câu 1: (1,5 điểm) Chia hết Cho hai số nguyên dương m, n số nguyên dương k Đếm xem có số tự nhiên đọan [m n] chia hết cho k Câu 2: (1,5 điểm) Viết chương trình giải yêu cầu sau: Một ngân hàng có mức huy động vốn với lãi suất hàng năm 10% Một người có số tiền 10,000,000 đồng (Mười triệu đồng) gửi tiết kiệm ngân hàng Cứ sau năm tiền lãi cộng gộp vào vốn để trở thành vốn để tính lãi cho năm sau Hỏi để (bao nhiêu năm) người 100,000,000 đồng (một trăm triệu đồng)? Lưu ý: Số tiền 100,000,000 đồng số tiền có sau gộp lãi vào vốn, khơng thiết phải số tiền xác cần tìm Câu 3: (2 điểm) Viết chương trình giải yêu cầu sau: Viết chương trình nhập vào số nguyên dương N, Với 2=2) and (n M[i] then Begin Tg:=M[i]; 1đ M[i]:=M[j]; M[j]:=Tg; End; Write('Day so sau sap xep: '); For i:=1 to n Write(M[i],';'); Writeln; Write('Phan tu co gia tri tuyet doi lon nhat:'); For i:= to n if abs(M[i])>abs(M[n]) then write(M[i]) else write(M[n]); 0,5đ Writeln; Write('Cac phan tu la so chinh phuong: '); For i:=1 to n if M[i]>=0 then 0,75 if sqr(trunc(sqrt(M[i]))) = M[i] then write(M[i],';'); Readln; End II LẬP TRÌNH BẰNG NGƠN NGỮ SCRATCH HS sử dụng cách giải, cách gải thứ thường dành cho học sinh tiểu học, cách giải thứ dùng cho học sinh trung học (sử dụng Pitago) Cách 1: Sử dụng nhân vật sau tạo di chuyển đến vị trí sau tiến hành đo khoảng cách góc Cách 2: sử dụng định lý Pitago để tính cạnh huyền tính góc lệnh hình vng ban đầu hình vng (Khuyến khích học sinh sử dụng) Lời giải tham khảo