ga bài 12 tin học 11

... từ kí tự từ trái sang phải * Quy ớc: - Xâu rỗng xâu - Xâu A = B chúng giống hệt - Ví dụ: Tin hoc = Tin hoc -Xâu A > B nếu: + Kí tự khác chúng xâu A có mã ASCII lớn xâu B - Ví dụ: Ha Noi > Ha ... vừa hỏi HS câu lệnh có liên quan đến Và hỏi thêm ý tởng thuật toán HS - HS: Chú ý nghe giảng, ghi bài, suy nghĩ trả lời câu hỏi Một số ví dụ * Ví dụ 1: Viết chơng trình nhập vào xâu đa hình xâu ... Và hỏi không báo không trùng Program VD2; thêm ý tởng thuật toán HS - HS: Chú ý nghe giảng, ghi bài, suy nghĩ Uses Crt; trả lời câu hỏi Var S1,S2: String; x:Byte; Begin Clrscr; Wrtite(Nhap vao...

Ngày tải lên: 30/06/2013, 01:26

... + Tên kiểu ghi - GV: Với kiểu liệu học có + Tên trờng thể quản lí đợc thông tin không? + Kiểu liệu trờng - HS: Suy nghĩ trả lời + Cách khai báo biến - ... tháng năm sinh, giới tính, điểm môn (Văn, Toán, Lí, Hoá, * Ví dụ: A.hoten Sinh, Ngoại ngữ, Tin) A.Ngaysinh - GV: Em xác định kiểu liệu cho Lop[i].toan trờng (mỗi nội dung trờng Với i số mảng ... Gán giá trị Nội dung gán giá trị cho ghi phức tạp biến khác Khi nhập thông tin vào từ phím, ta thờng phải nhập thông tin cho trờng - GV: Đa hai cách để gán giá trị cho ghi - HS: Chú ý nghe giảng...

Ngày tải lên: 30/06/2013, 01:26

... số dòng lệnh) End; - GV : Gọi vài học sinh hỏi ý nghĩa Close(f); câu lệnh chương trình End - HS : Tìm hiểu chương trình - GV : Khái quát lại chương trình để học sinh nắm sau chạy chương trình ... i:=1 to write(f2,a[i]:9:3),’ ‘); chương trình: Writeln(f2); - GV : Gọi học sinh xây dựng chương trình theo End; bước (có gợi ý học sinh Close(f2); close(f1); End vướng mắc) + Khai báo + Gán tên...

Ngày tải lên: 30/06/2013, 01:26

... Lấy hai ví dụ: Rẽ nhánh + VD1: Nếu Châu không học bị điểm Ta nói cách diễn đạt nh thuộc dạng thiếu: Nếu + VD2: Nếu Châu không học bị điểm kém, học có điểm cao Ta nói cách diễn đạt nh thuộc dạng ... trúc để giúp ta thực Lu ý: sau End phải dấu ; trớc Else không chứa dấu ; điều - GV: Giải thích cho học sinh thấy lại cần có câu lệnh ghép câu lệnh ghép có ý nghĩa gì? sau giáo viên đa cấu trúc câu ... nào, để khắc sâu kiến thức câu lệnh rẽ nhánh câu lệnh ghép cho HS - HS: xác định Input, Output bài, xác định kiểu liệu a,b,c,d - Thảo luận theo nhóm (4 hs/1 nhóm- bàn liền nhau) để viết toán...

Ngày tải lên: 03/07/2013, 21:50

... khin vũng lp - mụ t cu trỳc lp vi s ln bit trc, Pascal dựng cõu lnh lp for-do vi hai dng tin lựi + Dng lp tin: For := to ; + Dng lp lựi: For :=

Ngày tải lên: 03/07/2013, 21:50

... Bài 12 Giao tiếp với Hệ điều hành Nạp hệ điều hành Để làm việc với máy tính, hệ điều hành phải nạp ... môđun cần thiết hệ điều hành nạp vào nhớ 2 Cách làm việc với hệ điều hành Người dùng đưa thông tin vào hệ thống hai cách sau: Cách 1: Sử dụng lệnh Ví dụ: Hệ điều hành MS-DOS COPY C:\BAiTAP.PAS ... vào đĩa cứng trước tắt nguồn Máy tạm nghỉ, tiêu thụ lượng đủ để hoạt động lại Nhưng điện thông tin RAM bị Chọn chế độ này, máy tính khởi động lại ...

Ngày tải lên: 26/07/2014, 20:50

... nhập vào từ bàn phím thông tin học sinh lớp, thực xếp loại đưa hình kết xếp loại học sinh DẶN DÒ Học tiếp §14 “Kiểu liệu file” _Trang 82 _ Sách giáo khoa Thực tập 11 _ trang 80 _Sách Giáo khoa ... readln(LOP[i].SBD); Write(‘Ho va ten : ‘); readln(LOP[i].Hoten); Write(‘Ngay Sinh : ‘); readln(LOP[i].Ngaysinh); Write(‘Gioi tinh : ‘); readln(LOP[i].Gioitinh); Write(‘ Diem toan : ‘);readln(LOP[i].Toan); Write(‘ ... trường (field) Khai báo biến kiểu ghi (record) CÁC THAO TÁC VỚI BẢN GHI Nhập thông tin cho học sinh - Nhập số học sinh - Nhập kiệu (các trường) ghi Write(‘ Nhap vao so hoc sinh lop : ‘); readln(n);...

Ngày tải lên: 19/10/2014, 10:12

... theo cách tổ chức dự liệu: - Tệp văn bản: liệu ghi dạng kí tự theo mã ASCII Ví dụ: sách, tài liệu, học, chương trình nguồn viết ngôn ngữ bậc cao - Tệp có cấu trúc: thành phần tệp tổ chức theo cấu ... đọc liệu từ tệp Các thao tác với kiểu tệp:  Khai báo biến tệp  Mở tệp  Đọc/ghi liệu  Đóng tệp BÀI 15 THAO TÁC VỚI TỆP KHAI BÁO var : text Ví dụ: var tep1, tep2 : text THAO TÁC ... ); Trong đó, danh sách kết gồm hay nhiều phần tử Phần tử biến đơn biểu thức (số học, quan hệ lôgíc) xâu Trường hợp có nhiều phần tử phần tử phân cách dấu phẩy 2 THAO TÁC VỚI TỆP...

Ngày tải lên: 09/06/2013, 01:27

... chế độ phân giải màu sắc Tên gọi bảng mạch điều khiển hình thường trùng với loại hình, ví dụ VGA, SVGA,… - Trong Turbo Pascal, thư viện GRAPH cung cấp chương trình điều khiển tương ứng với loại ... driver gán trị (được định sẵn detect) Ví dụ Giả sử hình làm việc VGA tệp BGI để thư mục C:\TP\BGI, lệnh sau thiết lập đồ hoạ với chế độ VGAHi driver := 0; InitGraph(driver, mode, ‘C:\TP\BGI’); * Để ... Toạ độ hình đồ hoạ đánh số từ 0, cột tính từ trái sang phải dòng tính từ xuống Độ phân giải hình VGA thường đặt 640x480 b Khởi tạo chế độ đồ hoạ Thủ tục dùng để thiết lập chế độ đồ hoạ: Procedure...

Ngày tải lên: 09/06/2013, 01:27

... học sinh kiểm - Quan sát kết chương trình nghiệm kết tự suy luận IV ĐÁNH GIÁ CUỐI BÀI Những nội dung học - Các phép toán Turbo Pascal: số học, quan hệ logic - Các biểu thức Turbo Pascal: số học, ... Yêu cầu học sinh phác họa thuật toán Yêu cầu học sinh gõ chương trình vào máy - Giáo viên tiếp cận học sinh để hướng dẫn sửa sai Yêu cầu học sinh nhập liệu - Nhập liệu với test -2 Yêu cầu học sinh ... chọn tên A A A BC R12 6Pq _45 R12 X#y _45 - Tiểu kết cho vấn đề việc khẳng định lại tên Yêu cầu học sinh nghiên cứu sách giáo Nghiên cứu sách giáo khoa để trả lời khoa, (trang 10 -11) để biết khái...

Ngày tải lên: 24/06/2013, 01:26

... tích số nhập từ bàn phím Bài 5b: Viết hàm tính tích số nhập từ bàn phím Bài 6a: Viết thủ tục tính thương số nhập từ bàn phím Bài 6b: Viết hàm tính thương số nhập từ bàn phím Bài 7a: Viết thủ tục ... So_n(a1,d,n); Tong(a1,d,n); Readln; END Bài 9a: Viết thủ tục giải phương trình bậc ax+b=0 Bài 10a : Viết thủ tục giải phương trình bậc ax2+bx+c=0 Bài 11a: Viết thủ tục luythua để tính an , áp ... áp dụng: tính am+bn (a, b, m, n) nhập từ bàn phím Bài 11b: Viết hàm luythua để tính an , áp dụng: tính am+bn (a, b, m, n) nhập từ bàn phím Bài 12: Viết thủ tục vẽ hình chữ nhật rỗng ruột (bằng...

Ngày tải lên: 14/09/2013, 14:10

Ngày tải lên: 26/09/2013, 00:10

... ',dem,' chu so xau vua nhap'); readln end end Ví Dụ Bai 11 program bai11; uses crt; const max=60; type Hocsinh = record hoten:string[30]; ngaysinh:string[10]; diachi:string[50]; toan, van:real; ... (b-c>=25) and (b>=2*c); if b=2*c then writeln('Hien tuoi cha gap hai lan tuoi con.') else if b>2*c then ',bwriteln('Sau ',b-2*c,' nam tuoi cha se gap doi tuoi con'); readln end end Ví Dụ Bi program Bai8; ... ');readln(y); kt:=false; if (abs(y)

Ngày tải lên: 07/11/2013, 15:15

... n IF A[i] mod = then S:=S+A[i]; 15 20 16 25 18 12 19 S = 45 Thông thường, thao tác xử lí mảng chiều dùng câu lệnh FOR DO Ghi nhớ! 15 20 19 25 18 12 16 Mảng chiều dãy hữu hạn phần tử kiểu Var ... dài (với 365 lệnh IF) !!!!! Khái niệm Mảng chiều dãy hữu hạn phần tử kiểu Ví dụ: A 17 20 18 25 19 12 19 Trong : Tên mảng : A Số phần tử mảng: Kiểu liệu phần tử: Kiểu nguyên Khi tham chiếu đến ... = Nhập số phần tử mảng (n) Nhập vào giá trị phần tử mảng (A[i]) Thể pascal Write( Nhap vao so ngay:); Readln(n); For i:=1 to n Begin write(nhiet thu ,i, : ); readln(A[i]); end; b In mảng chiều...

Ngày tải lên: 28/11/2013, 09:11

... NINH TRƯỜNG THPT TIÊN YÊN ĐỀ KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) II ... TIÊN YÊN ĐỀ THI - ĐÁP ÁN KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Sè ph¸ch: Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) ... mang1c : array [1 100] of char; ĐỀ KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) II...

Ngày tải lên: 28/11/2013, 18:11

... NINH TRƯỜNG THPT TIÊN YÊN ĐỀ KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) II ... TIÊN YÊN ĐỀ THI - ĐÁP ÁN KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Sè ph¸ch: Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) ... mang1c : array [1 100] of char; ĐỀ KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) II...

Ngày tải lên: 28/11/2013, 18:11

... NINH TRƯỜNG THPT TIÊN YÊN ĐỀ KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) II ... TIÊN YÊN ĐỀ THI - ĐÁP ÁN KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Sè ph¸ch: Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) ... mang1c : array [1 100] of char; ĐỀ KIỂM TRA HỌC KÌ I N¨m häc 2010 – 2 011 Môn: Tin - Khối 11 Thời gian: 45 phút (Không kể thời gian giao đề) Họ tên: Lớp: 11 SBD: Điểm: ( Phần dọc phách) II...

Ngày tải lên: 28/11/2013, 18:11

... ',dem,' chu so xau vua nhap'); readln 11 Giải Bài tập SGK tin học 11 end Bài 11 program bai11; uses crt; const max=60; type Hocsinh = record hoten:string[30]; ngaysinh:string[10]; diachi:string[50]; ... writeln('Tong can tinh la: ',s); readln end Bài cho kết ngẫu nhiên nên kết bạn khác Bài program mang2; uses crt; var A:array[1 100] of integer; n,i,j,max:integer; Giải Bài tập SGK tin học 11 begin clrscr; ... writeln('Hien tuoi cha gap hai lan tuoi con.') else if b>2*c then writeln('Sau ',b-2*c,' nam tuoi cha se gap doi tuoi con'); readln end Bài program Bai8; Giải Bài tập SGK tin học 11 uses crt; var A,...

Ngày tải lên: 30/11/2013, 06:11

... Năm học 2008_ 2009 A Phần trắc nghiệm ( Mỗi câu điểm) Câu Đáp án B A A D B C B A B Phần tự luận: Câu ... Đáp án môn công nghệ 12 B Phần trắc nghiệm ( Mỗi câu điểm) Câu Đáp án B A A D B C B A B Phần tự luận: Câu 1: (3.0 điểm)...

Ngày tải lên: 25/01/2014, 00:20

... a[i]:=a[i+1]; A[i+1]:=t; dem:=dem+1; Bµi tËp Tin häc 11 PASCAL end; write('Sau dao ',dem,' lan'); for i:=1 to n write(A[i]:7); writeln; readln end Bài thực hành số Bài program xau; uses crt; var i, x:byte; ... write('Co ',dem,' chu so xau vua nhap'); readln end Bài 11 program bai11; uses crt; const max=60; type Hocsinh = record hoten:string[30]; ngaysinh:string[10]; diachi:string[50]; toan, van:real; ... f2:=f; end; write('So fibonaxi thu ',n,'la ',f); readln end Bài program bai9; uses crt; var A:array[1 15,1 15] of integer; Bµi tËp Tin häc 11 PASCAL N, i, j, max, ind, vsp:integer; begin clrscr;...

Ngày tải lên: 11/07/2014, 20:20