Một số kinh nghiệm chuyển bài toán lập trình pascal sang lập trình scratch

MUA SKKN LIÊN HỆ SĐT, ZALO: 0946.734.736 I LÝ DO CHỌN ĐỀ TÀI Lập trình Pascal mơn học tạo cho học sinh tính tư sáng tạo tinh thần làm việc độc lập cao Tuy nhiên với cách lập trình cách viết câu lệnh phức tạp giao diện đồ họa giản đơn làm cho Pascal trở nên khó khăn xa lạ người sử dụng học sinh Bên cạnh ngơn ngữ lập trình Scratch mơi trường lập trình ứng dụng đặc biệt, việc “viết” lệnh thực thao tác “kéo thả” Thực tế chứng minh tính hấp dẫn mơi trường lập trình kéo thả Scratch, đam mê lập trình trẻ nhỏ Scratch vơ thích hợp cho cấp Tiểu học, Trung học sở Việt Nam Chính Chương trình đổi giáo dục Việt Nam sau năm 2018, Bộ Giáo dục & Đào tạo định đưa nội dung kiến thức Khoa học máy tính môn Tin học vào từ cấp Tiểu học, ngơn ngữ lập trình kéo thả Scratch sẻ lựa chọn tốt cho nhà trường học sinh Những năm gần lập trình Scratch chọn để tổ chức kỳ thi Tin học trẻ khơng chun cấp Quốc gia Để giải tốn với ngơn ngữ lập trình Scratch cần trang bị cho kiến thức Scratch, chuyển kiến thức lập trình học sang lập trình Scratch Vì tơi chọn đề tài: “ Một số kinh nghiệm chuyển tốn lập trình Pascal sang lập trình Scratch” Nhiệm vụ cá nhân Trong đề tài tơi tìm hiểu xem lập trình Scratch gì, cách sử dụng Kế tơi nghiên cứu kiến thức để giải tốn đơn giản lập trình Scratch Cuối chuyển toán từ lập trình Pascal có sang lập trình Scratch Thực trạng phạm vi cơng việc Trong q trình giảng dạy lập trình Pascal nhà trường tơi thấy Pascal khó sử dụng, học sinh viết câu lệnh sai cú pháp, chưa u thích mơn học Trong lập trình Scratch mơi trường lập trình trực quan, sinh động, dễ sử dụng, sai lỗi cú pháp tạo niềm đam mê nghiên cứu cho người học Sratch thích hợp để tạo ứng dụng đồ hoạ, hiệu ứng, học, giảng, mơ kiến thức, trình diễn, sách điện tử, trị chơi, phù hợp với nhà trường, giáo viên học sinh II NHỮNG GIẢI PHÁP ĐÃ THỰC HIỆN Kiến thức để lập trình với Scratch: Nhằm giúp cho người học có đủ khả chuyển tốn lập trình Pascal sang lập trình Scratch người học phải trang bị cho số kiến thức lập trình Scratch Trong nội dung tơi đề cập đến kiến thức xử lý số, xử lý xâu kí tự lệnh lệnh lập trình Scratch PASCAL SCRATCH Ý NGHĨA File -> Save File -> Save Lưu File -> Open File -> Open Mở Ctrl + F9 Chạy chương trình Write(‘Chào bạn’); In thơng tin hình Write(‘Nhập n=’); Readln(n); Nhập giá trị từ bàn phím cho biến n Var n:Integer; Khai báo biến n kiểu số nguyên Var a:Array[1 10] of integer; Khai báo mảng a gồm 10 phần tử số nguyên + Phép cộng - Phép trừ * Phép nhân / Phép chia Mod Phép chia lấy phần dư Div 15 Div < = > Phép chia lấy phần nguyên Bé Bằng Lớn AND OR NOT Và a:=10; Gán giá trị 10 cho biến a s1+s2 Kết xâu kí tự s1 với s2 s[2] Lấy phần tử thứ xâu s Length(s) Lấy chiều dài xâu s Abs(a) Lấy giá trị tuyệt đối biến a a có n phần tử a[n+1]:=10; Thêm vào cuối mảng a giá trị 10 Delete(a,1,1); Thực xâu kí tự Xố phần tử thứ mảng a Insert(‘10’,a,2); Thực xâu kí tự Thêm giá trị 10 vào vị trí mảng a a[1] Lấy phần tử thứ mảng a a[i]:=n; Gán biến n cho phần tử thứ i Length(a) Thực xâu kí tự Số phần tử mảng a Hoặc Phủ định If Then ; Câu lệnh điều kiện dạng thiếu If Then Câu lệnh điều kiện dạng đủ Else ; If Then Else If Then Câu lệnh điều kiện dạng lồng Else ; Câu lệnh lặp với số lần biết trước (lặp n lần) For To Do For i:=1 to n Câu lệnh lặp lồng For j:=1 to m Repeat Until Câu lệnh lặp với số lần chưa biết trước Break Thốt khỏi vịng lặp gần thoả điều kiện Cách chuyển toán Pascal sang Scratch: 2.1 Bài 1: Tính tổng Viết chương trình nhập vào hai số nguyên a, b Tính tổng hai số a,b in kết tổng hình * Thuật tốn: Bước : Nhập giá trị a Bước : Nhập giá trị b Bước : Tính tổng hai số a, b Bước : In tổng hình kết thúc PASCAL SCRATCH Var a,b,tong:Integer; Begin Write('Nhap a='); Readln(a); Write('Nhap b='); Readln(b); tong:=a+b; Write('Tong=',tong); End 2.2 Bài 2: So sánh Viết chương trình nhập vào hai số a, b So sánh hai số a, b Nếu ab thông báo “a lớn b” kết thúc Nếu a1)And(tat=0) Then Write('On') Else Write('Off'); End 2.9 Bài 9: Tổng gần (Bài đề thi học sinh giỏi cấp huyện 2017 - 2018 ) Cho tập hợp A chứa n số nguyên dương phân biệt số nguyên T.Viết chương trình tìm A hai số nguyên phân biệt có tổng gần với số T * Thuật toán: Bước 1: Nhập giá trị n, t Bước 2: Nhập giá trị cho n phần tử mảng a Bước 3: min=|(a[1]+a[2])-t|, tong=a[1]+a[2] Bước 4: Lặp n-1 lần Bước 4.1: Tại vòng lặp thứ i, j=i+1 Bước4.2: Lặp n-i lần, vịng lặp thứ j min>|(a[i]+a[j])-t| min=| a[i]+a[j]-t| tong=a[i]+a[j] Bước 5: In tổng hình kết thúc 10 PASCAL SCRATCH Var n,t,i,j,min,tong:integer; a:array[1 1000] of integer; Begin Write('Nhap n='); readln(n); Write('Nhap t='); Readln(t); For i:= to n Begin Write('Nhap pt thu',i); Readln(a[i]); End; min:=abs(a[1]+a[2]-t); tong:=a[1]+a[2]; For i := To n-1 Do For j:=i+1 To n Do If abs(a[i]+a[j]-t)