... Giai_pt; Uses crt; Var a, b, c, D, x1, x2: real; Begin Clrscr; Write(’nhap a,b,c ’); Readln(a, b, c); D:= b*b-4*a*c; x1:= (-b-sqrt(d))/(2*a); x2:= (-b+sqrt(d))/(2*a); Writeln(’x1=’,x1:6:2,’ x2=’,x2:6:2); ... DÙNG DẠY HỌC 1. Giáo viên: Phong máy vi tính được cài đầy đủ Turbo Pascal, projector để hướng dẫn 2. Học sinh: Sgk, sách bài tập và bài tập đã viết ở nhà III. HOẠT ĐỘNG DẠY HỌC 1. Kiểm tra bài ... hỏi 1: Viết cấu trúc của thủ tục nhập dữ liệu từ bàn phím? Lấy vd Câu hỏi 2: Viết chtrình nhập vào một số và tính bình phương của số đó. 2. Các hoạt động của giáo viên và học sinh Hoạt động 1: ...