Tin học 11

Hướng dẫn giải bài tập 7 SGK Tin học 11 - Trang 51

2014-12-22T13:54:00.006+07:00

Đề bài: Nhập từ bàn phím tuổi của cha và con (hiện tại tuổi cha lớn hơn hai lần tuổi con và tuổi cha hơn tuổi con ít nhất là 25). Đưa ra màn hình câu trả lời cho câu hỏi " Bao nhiêu năm nữa thì tuổi cha gấp đôi tuổi con?"

Code mẫu:
Readln(cha,con);
nam:=0;
Repeat
inc(cha);
inc(con);
inc(nam);
Until cha=2*con;
Writeln(nam);

Hướng dẫn giải bài toán cổ Vừa gà vừa chó (pascal)

2014-12-22T13:53:00.000+07:00

Đề bài: lập trình giải bài toán cổ (Bài tập 6 - SGK tin học 11 - Trang 51)
Vừa gà vừa chó
Bó lại cho tròn
36 con
100 chân chẵn
Hỏi số gà, số chó?

Bài này mình có thể làm theo 3 cách khác nhau sử dụng các dạng vòng lặp For, While
Đây là cách 1: Bài vừa gà vừa chó

var g,c: integer;
begin

for c:=1 to 25 do
begin

g:=36-c;

if g*2+c*4=100 then write('So ga: ', g ,' So cho: ',c);
end;

end.

Cách 2: Bài vừa gà vừa chó

For i:=1 to 36 do
If 4*i+2*(36-i)=100 then Writeln('Cho:',i,' Ga:',36-i);

Hướng dẫn giải bài tập tin học 11 Pascal - chương 3 - trang 51

2013-10-31T21:59:00.001+07:00

Bài 1: Sự giống nhau và khác nhau giữa hai dạng câu lệnh if-then
Hai dạng câu lệnh If-then trong Pascal:
- Dạng khuyết: If <điều kiện> Then <câu lệnh>;
- Dạng đủ: If <điều kiện> Then <câu lệnh 1> Else <câu lệnh 2>;

- Sự Giống nhau: Cả hai dạng câu lệnh đều thực hiện việc kiểm tra <điều kiện> trước.
- Sự Khác nhau: Đối với dạng khuyết thiếu nếu <điều kiện sai> thì bỏ qua việc thực hiện câu lệnh sau Then và thực hiện tiếp chương trình; đối với dạng đủ nếu <điều kiện> sai thì thực hiện <câu lệnh 2>;

Bài 2: Câu lệnh ghép là gì? Tại sao phải có câu lệnh ghép?
- Câu lệnh ghép là một nhóm các câu lệnh được đặt trong cặp từ khóa Begin... End;
- Khi <câu lệnh> gồm nhiều thao tác phức hợp cần thiết phải có nhiều câu lệnh nhỏ để thực hiện thì các câu lệnh con được gộp với nhau trong câu lệnh ghép.

Bài 3: Có thể dùng cấu truc While-Do thay thế cho cấu trúc For-Do được.

Ví dụ Tong1_a viết lại dùng cấu trúc While-Do:
Var S: real;
a,N: integer;
Begin
clrscr;
Write('Nhap a:,') Readln(a);;
S:=1/a;
While N<100 do
begin
S:=S+1/(a+N);
N:=N+1;
End;
Writeln('Tong la: ', S:8:4);
Readln;
End.

Bài 4: Viết câu lệnh rẽ nhánh tính biểu thức
a) if(sqr(x)+sqr(y)<=1) then z:=sqr(x)+sqr(y)
else if ((sqr(x)+sqr(y)>1) and y>=x) then z:=x+y
else z:=0.5;

b) if (sqr(x-a)+sqr(x-b))<=R*R then z:=abs(x)+abs(y)
else z:=x+y;

Bài 5: Tính giá trị tổng
a) For i:=1 to 50 do
Y:=Y+1/(1+i);

b) S:=1; N:=1;
While 1/(S*N) <2.E-6 Do
S:=S+1/(S*N);
Writeln('Tong la: ', S:8:4);
Readln;
End.

Bài 6: Giải bài toán vừa gà vừa chó
var ga, cho: integer;
Begin
clrscr;
for ga:=1 to 36 do
begin
cho:=36-ga;
if (cho*4+ga*2=100) then Write('So ga: ', ga, ' So cho: ', cho);
end;
Readln;
End.
Bài 7:

Bài 8:

Hướng dẫn giải bài tập Pascal 11 - chương 2 - trang 35-36

2013-10-08T15:16:00.000+07:00

Bài 1: Hãy cho biết sự khác nhau giữa hằng có đặt tên và biến? (sgk)
Bài 2: Tại sao phải khai báo biến? (sgk)
Bài 3: Biến chỉ nhận giá trị nguyên trong khoảng 10 đến 25532 thì có thể khai báo bằng các kiểu dữ liệu Integer, Word, LongInt, Real, Extended đều được
Bài 4: Đáp án B, D đều có thể chấp nhận được.
Bài 5. Đáp án thích hợp nhất là C
Bài 6:
(1+z)*((x+y/z)/(a-1/(1+x*x*x)))
Bài 7:
Bài 8: Viết biểu thức logic
a) abs(x)<=1 and (y>=0 and y<=1) and abs(y)>=x;
b) abs(x)<=1 and abs(y)<=1;
Bài 9:
Program bai9;
var
R,S: real;
pi=3.14;
uses:crt;
Begin
Write('Nhap ban kinh: ');
Readln(R);
S=pi*R*Y/2;
Writeln('Dien tich phan hinh gach cheo la: ', S:7:4);
Readln;
End.

Bài 10:
Program bai10;
var
h,v: real;
g=9.8;
uses crt;
begin
clrscr;
write('Nhap vao do cao h = ');
Readln(h);
write('Van toc tai thoi diem cham dat cua vat la v = ', sqrt(2*g*h):6:3);
Readln;
End.

Kiểu dữ liệu mảng (Bài 11. Kiểu mảng)

2013-01-19T09:37:00.000+07:00

1. Làm việc với mảng một chiều trong Pascal

Khái niệm: Mảng một chiều là một dãy hữu hạn các phần tử có cùng kiểu
Khai báo mảng 1 chiều:
Cách 1: Trực tiếp

Var <DS biến mảng> : array[<chỉ số đầu>..<chỉ số cuối>] of <kiểu phần tử> ;

Cách 2: Gián tiếp

Type <Tên mảng> = array[<chỉ số đầu>..<chỉ số cuối>] of <kiểu phần tử> ;

Var <DS biến mảng> :<Tên mảng> ;

Truy cập phần tử trong mảng một chiều

2. Bài tập về mảng một chiếu trong lập trình Pascal

Bài tập về làm việc với tệp trong pascal

2012-10-05T15:31:00.001+07:00

Dưới đây là một số đề bài tập dạng đơn giản nhằm rèn luyện kĩ năng làm việc với tệp trong pascal:
Working with file in Turbo Pascal:

Bài tập 1: Một trường THPT tổ chức cho các giáo viên và học sinh của trường đi cắm trại, sinh hoạt ngoài trời ở vườn quốc gia Cúc Phương. Để lên lịch đến thăm khu trại các lớp, thầy hiệu trưởng cần biết khoảng cách từ trại của mình (ở vị trí có tọa độ (0,0)) đến các trại của các giáo viên chủ nhiệm. Mỗi lớp có một trại, vị trí của trại mỗi giáo viên chủ nhiệm đều có tọa độ nguyên (x,y) được ghi trong tệp văn bản TRAI.TXT. Lập chương trình đọc các cặp tọa độ từ tệp TRAI.TXT, tính rồi đưa ra màn hình khoảng cách (với độ chính xác là hai số sau dấu phẩy thập phân) giữa trại của mỗi giáo viên chủ nhiệm và trại của thầy hiệu trưởng?

Bài tập 2: Tính điện trở tương đương
Cho ba điện trở R1, R2, R3. Sử dụng cả ba điện trở để tạo ra năm mạch điện có điện trở tương đương khác nhau bằng cách mắc theo các sơ đồ khác nhau. Cho tệp văn bản RESIST.DAT gồm nhiều dòng, mỗi dòng chứa ba số thực R1, R2, R3, các số cách nhau bởi một dấu cách.
Lập chương trình tính các điện trở tương đương và ghi kết quả vào tệp RESIST.EQU, mỗi dòng ghi 5 điện trở tương đương của ba điện trở ở dòng dữ liệu vào tương ứng?

Tài liệu hướng học Windows XP

2012-04-10T12:13:00.000+07:00

Hướng dẫn học Windows XP

Làm việc với tệp trong Pascal

2012-03-27T09:33:00.000+07:00

Để có thể thao tác với tệp trong pascal, người lập trình cần tìm hiểu cách thức mà ngôn ngữ này cung cấp để thực hiện các công việc sau:
- Khai báo biến tệp
- Mở tệp
- Đọc hoặc ghi dữ liệu
- Đóng tệp

Cụ thể như sau:

1. Khai báo tệp
Var <tên biến tệp>: text;

2. Thao tác với tệp
a. Gắn tên tệp
Assign (<biến tệp>, <tên tệp>);
Sau lệnh gán tên tệp này, các thao tác với biến tệp thực chất là các thao tác với tệp.

b. Mở tệp:
- Mở để đọc: rewrite(<biến tệp>);
- Mở để ghi: reset(<biến tệp>);

c. Đọc và ghi tệp văn bản
- Đọc dữ liệu từ tệp vào biến: read(<biến tệp>;<danh sách biến>); (hoặc readln)
- Ghi dữ liệu lên tệp: write(<biến tệp>;<danh sách biến>); (hoặc writeln)

sử dụng một số hàm chuẩn khi đọc hoặc ghi văn bản:
eof(<biến tệp>); kiểm tra vị trí cuối tệp: kiểu dữ liệu trả về là Boolean
eoln(<biến tệp>); kiểm tra vị trí cuối dòng: kiểu dữ liệu trả về là Boolean

d. Đóng tệp:
close(<biến tệp>);

Tìm hiểu thuật toán loang

2012-03-22T10:33:00.003+07:00

Tư tưởng của thuật toán loang thật ra cũng rất đơn giản. Hãy tưởng tượng có một nàng công chúa bị bắt giam vào 1 mê cung, nàng bí quá, lôi ĐTDĐ ra fone cho hoàng tử. Hoàng tử tức tốc dẫn theo một đạo quân (giả sử rằng số quân của chàng ta là ko giới hạn). Khi đến cổng vào mê cung, chàng may mắn gặp một "bậc thánh nhân", người cho chàng biết rằng công chúa đang bị giam trong phòng [X,Y] nào đó. À, bây giờ trong đầu chàng nghĩ đến 2 hướng sau:

Chàng quyết định solo đi vào mê cung, dĩ nhiên trên tay cầm 1 cuộn chỉ. Khi vào cổng, chàng bắt gặp T căn phòng, chàng sẽ đi vào từng phòng một, bước vào T1, chàng lại gặp T2 cửa, ... , cứ thế đến khi ko có đường đi, chàng sẽ lần ngược theo đường chỉ, đánh dấu vào cánh cửa chàng đã đi rồi, và chọn 1 cửa khác. Với cách này, chàng sẽ tìm được phòng có công chúa, dĩ nhiên, nếu chàng ko gục ở giữa đường.

Tận dụng nguồn binh lực hùng hậu của mình, chàng ra hiệu lệnh "Toàn lực lục soát". Đi vào mê cung, bắt gặp T căn phòng, chàng chia đoàn binh thành T đạo, cứ thế. Dĩ nhiên, mỗi binh sĩ đều đc trang bị phương tiện liên lạc để khi tìm thấy công chúa sẽ phát hiệu lệnh "Rút lui". Vậy, với cách này ta sẽ tìm được công chúa với quãng đường đi từ cửa mê cung đến phòng giam là ngắn nhất. Nhưng, nảy sinh một bất cập là, nếu binh sĩ tìm được công chúa rồi, thì làm sao lần ra lại cửa mê cung đây??? Đương nhiên hoàng tử ko thể chấp nhận chuyện để người yêu mình chung phòng với một đám binh sĩ ~~. Chàng ra lệnh rằng, trước khi vào mỗi cửa, phải dùng kiếm vạch mũi tên xuống đất, mũi tên này sẽ hướng đến cửa các binh sĩ đã đi vào trước khi gặp căn phòng. Ví dụ khi vào cổng mê cung, 1 tốp binh sĩ đi vào cửa T1, gặp N2 cửa khác, chia binh lực ra, với mỗi cửa T2, các binh sĩ sẽ vạch mũi tên hướng về cửa T1, tức cửa đã dẫn họ tới N2 căn phòng. Nhờ đó họ sẽ lần được đường thoát khỏi mê cung.

Từ đây, ta sẽ hình thành 2 phương pháp tìm đường đi, trong bài viết này, chúng ta sẽ tìm hiểu cách thứ hai, mà theo cách gọi thông thường là LOANG: Từ một vị trí có tọa độ A(x,y) cho sẵn, bạn buộc phải tìm đến một vị trí B(x’,y’) sao cho quảng đường đi là ít nhất có thể và in ra đường đi từ A đến B đó.
(Tham khảo)

Đề thi trắc nghiệm tin học trẻ không chuyên (tham khảo)

2012-03-21T09:13:00.000+07:00

1. 1 Byte bằng bao nhiêu Bit?

a. 8

b. 256

c. 1000

d. 1024

2. Trong các loại máy tính dưới đây, máy tính nào mạnh nhất

a. PC

b. Laptop
c. Mainframe

d. Mini Computer

3. Nếu bạn muốn chọn hình ảnh mới chụp cho bạn bằng thư điện tử, bạn sử dụng thiết bị nào để đưa các bức ảnh đó vào máy tính?

a. Bàn phím

b. Chuột

c. Máy quét

d. Máy ảnh số

4. Bộ nhớ nào là bộ nhớ trong?

a. Đĩa cứng

b. Đĩa mềm

c. RAM

d. Đĩa CD

5. Bộ nhớ nào là bộ nhớ chỉ đọc?

a. RAM

b, ROM

c. Đĩa cứng

d. Đĩa mềm

6. Đầu không phải là thiết bị vào?

a. Chuột

b. Bàn phím

c. Màn hình

d. Máy quét

7. Việt Nam chính thức tham gia Internet vào năm nào?

a. 1990

b. 1997

c. 1998

d. 2000

8. Phím tắt nào được sử dụng để đóng cửa sổ hiện hành

a. F1

b. Atl + F4

c. Tab + 9

d. F7

9. Trong một chương trình, chẳng hạn như WordPad, phím tắt nào để lưu tệp tin?

a. Atl + S

b. Ctrl + S

c. Shift + s

d. Tab + S

10. Trong một chương trình, chẳng hạn như WordPad, phím tắt nào để mở tệp tin?

a. Atl + O

b. Ctrl + O

c. Shift + O

d. Tab + O

11. Bạn giữ phím gì khi muốn chọn nhiều đối tượng liền nhau?

a. Atl

b. Ctrl

c. Shift

d. Tab

12. Bạn có thể sắp xếp các biểu tượng trên màn hình theo ngày. Đúng hay sai?

a. Đúng

b. Sai

13. Bạn có thể sắp xếp các biểu tượng trên màn hình theo kích thước. Đúng hay sai?

a. Đúng

b. Sai

14. Bạn có thể sắp xếp các biểu tượng trên màn hình theo vị trí mạng. Đúng hay sai?

a. Đúng

b. Sai

15. Phần mở rộng của tệp tin WordPad là gì?

a. .DOT

b. .DOC
c. .BAK

d. .TMP

16. Để tạo một thư mục mới bạn nhấp chuột phải và thư mục đã có và chọn lệnh Newfolder từ thực đơn thả xuống vừa xuất hiện. Đúng hay sai?

a. Đúng

b. Sai

17. Phím tắt để sao chép một thư mục trong ClipBoard là gì?

a. Ctrl + C

b. Ctrl + X

c. Ctrl + V

d. Ctrl + Z

18. Đâu là định nghĩa đúng nhất về một trang web?

a. Là trang văn bản thông thường

b. Là trang văn bản chứa các liên kết cơ sở trong đó

c. Là trang siêu văn bản phối hợp giữa trang văn bản thông thường với hình ảnh, video và các liên kết siêu văn bản khác.

d. Là trang văn bản chứa văn bản và hình ảnh

19. Chương trình được sử dụng để xem cá trang Web được gọi là gì?

a. Trình duyệt Web

b. Bộ duyệt Web

c. Chương trình xem Web

d. Phần mềm xem Web

20. Để xem 1 trang web, bạn gõ địa chỉ của trang đó vào đâu?

a. Thanh địa chỉ của trình duyệt

b. Thanh trạng thái của trình duyệt

c. Thanh công cụ chuẩn của trình duyệt

d. Thanh liên kết của trình duyệt

21. Nút Back ở trên thanh công cụ của trình duyệt có tác dụng gì?

a. Quay trở lại trang Web trước đó

b. Quay trở lại cửa sổ trước đó

c. Quay trở lại màn hình trước đó

d. Đi đến trang Web tiếp theo

22. Bạn nhấp nút nào trên thanh công cụ để làm tươi 1 trang Web

a. Home

b. Refresh

c. Next

d. Back

23. Theo mặc định phần mềm word sẽ lưu tài liệu của bạn với phần mở rộng là .DOC. Đúng hay sai?

a. Đúng

b. Sai

24. Bạn không thể ẩn thanh công cụ chuẩn. Đúng hay sai?

a. Đúng

b. Sai

25. Biểu tượng Undo nằm trên thanh công cụ định dạng đúng hay sai?

a. Đúng

b. Sai

Cấu trúc IF...THEN và ví dụ

2012-03-15T10:59:00.001+07:00

DẠNG ĐỘC LẬP

If (Biểu thức logic)
Then
 Begin
  { Các câu lệnh };
 End
Else
 Begin
  { Các câu lệnh };
 End;

Ví dụ 1: Kiểm tra một số nguyên nhập vào có phải là điểm số hay không? (trong khoảng 0-10)

Ví dụ 2: Kiểm tra một số nhập vào có phải là số nguyên tố hay không?

DẠNG LỒNG NHAU:

If (AccountType = 'C')
Then
 Begin { If }
  If (Balance > 0)
  Then
   Begin
    Writeln ('Send new cheque book. ');
   End;
 End;

Ví dụ trên: nếu AccountType là loại C và nếu Balance > 0 thì in ra 
"Send new cheque book."

Lựa chọn một đề tài phần mềm phù hợp với học sinh THPT

2012-03-15T09:21:00.001+07:00

Đối với các học sinh cấp THPT với lực học vừa vừa mà khả năng sử dụng máy tính để chơi game tốt có đề tài phần mềm nào là phù hợp? Có thể chỉ là các phần mềm đơn giản dựa trên các phần mềm ứng dụng của Microsoft Offices như Word, Excel, Power Point hay Access và một số đề tài nhỏ như tạo Forum, website dựa trên mã nguồn mở mà thôi.

Dựa trên một số chủ đề mà BTC đưa ra làm sao để chọn được một đề tài khả thi:

Môi trường và bảo vệ môi trường
Học sinh với an toàn giao thông
Phục vụ học tập
Phục vụ vui chơi giải trí
...

Một số gợi ý:

Tạo từ điển về môi trường sử dụng Microsoft Excel
Tạo forum - diễn đàn trao đổi
Ứng dụng hệ thống quản lý môn học Moodle thiết kế các bài thi trắc nghiệm
Tạo website đơn giản hỗ trợ tự học tiếng Anh

Custom Search

Một số ý tưởng phần mềm tham khảo

2012-03-15T07:43:00.001+07:00

Chủ đề môi trường và bảo vệ môi trường

Chủ đề An toàn giao thông

Những phương tiện giao thông quen thuộc
Hiệu lệnh đường bộ
Những biển báo thường gặp
Vạch kẻ đường
Giao thông và Ô nhiễm môi trường

Chủ đề học tập, vui chơi, giải trí

Tham khảo ý tưởng:

Phần mềm Tiết kiệm năng lượng
Phần mềm Năng lượng mới
Phần mềm Tiết kiệm điện
Phần mềm Nếp sống văn minh
Phần mềm Dân số
Phần mềm Bảo vệ động vật quý hiếm
Phần mềm An toàn thực phẩm
Phần mềm Ô nhiễm không khí
Phần mềm Rác thải
Phần mềm Ô nhiễm đất
Phần mềm Nước sạch
Phần mềm Tiếng ồn
Phần mềm Cây xanh
Phần mềm An toàn sức khỏe sinh sản

Các kiểu dữ liệu chuẩn

2012-03-14T16:03:00.000+07:00

1. Kiểu nguyên:

Byte
Integer
Word
Longint

2. Kiểu thực

Real
Extended

3. Kiểu kí tự

Char

4. Kiểu logic

Boolean

Người lập trình cần tìm hiểu đặc trưng của các kiểu dữ liệu chuẩn được xác định bởi bộ dịch và sử dụng để khai báo biến.