dùng ngôn ngữ lập trình Pascal,viết chường trình tính tổng 50 số tự nhiên đầu tiên.( dùng While..do,hoặc For..do)
sử dụng vòng lập while...do, viết chương trình tính tổng của 50 số tự nhiên đầu tiên
help
Program Tinh_tong ;
Uses Crt;
Var i ,S: integer ;
Begin
S: = 0 i;=0 ;
While < 51 do begin
i : = i + 1 ;
S: = S + i ;
end ;
Write ('Tong la',S);
End.
Trong lập trình cấu trúc lặp dùng để làm gì? Nêu cú pháp và hoạt động câu lệnh lặp While... do... trong ngôn ngữ lập trình Pascal ?
Cấu trúc lặp được sử dụng để chỉ thị cho máy tính thực hiện lặp lại một vài hoạt động nào đó cho đến khi một điều kiện nào đó được thỏa mãn.
Cú pháp: While <điều kiện> do <câu lệnh>
Hoạt động: Câu lệnh viết sau từ khóa do được thực hiện khi biểu thức điều kiện còn nhận giá trị true. Biểu thức điểu kiện được tính giá trị trước khi câu lệnh được thực hiện, nhưng nếu biểu thức điểu kiện đã nhận giá trị sai ngay từ đầu thì câu lệnh không được thực hiện lần nào. Nếu biểu thức điều kiện luôn nhận giá trị ĐÚNG thì câu lệnh được thực hiện mãi, ta gọi là vòng lặp vô hạn.
Cấu trúc lặp được sử dụng để chỉ thị cho máy tính thực hiện lặp lại một vài hoạt động nào đó cho đến khi một điều kiện nào đó được thỏa mãn. Mọi ngôn ngữ lập trình đều có các câu lệnh lặp để thể hiện cấu trúc lặp.
Cú pháp: While <điều kiện> do <câu lệnh>;
Viết chương trình in ra màn hình Dãy số từ 1 đến n bằng ngôn ngữ lập trình Pascal dùng lệnh lặp for..... do với n được nhập vào từ bàn phím
Var i,n:integer;
Begin
Write('n = ');readln(n);
Write('Day so tu 1 den ',n,' la ');
For i:=1 to n do write(i:8);
Readln
End.
Hãy viết chương trình tính tổng, tích của các số tự nhiên từ 1àN (n được nhập từ bàn phím) bằng cách dùng câu lệnh For...do hoặc While...do?
Hãy viết chương trình tính tổng tích, của các số tự nhiên từ 1 đến N (n được nhập từ bàn phím) bằng cách dùng câu lệnh For...do hoặc While...do?
program TinhTongTich;
var
N, i, Tong, Tich:integer;
begin
writeln('Nhap so nguyen duong N:');
readln(N);
i:=1;
Tong:=0;
Tich:=1;
while i<=N do
begin
Tong:=Tong+i;
Tich:=Tich*i;
i:=i+1;
end;
writeln('Tong cac so tu 1 den ', N, ' la: ', Tong);
writeln('Tich cac so tu 1 den ', N, ' la: ', Tich);
readln;
end.
sử dụng vòng lập while...do để viết chương trình tings tổng các số chẳn trong 50 sồ tự nhiên đầu tiên
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
i:=0;
while i<=50 do
begin
i:=i+2;
t:=t+i;
end;
writeln(t);
readln;
end.
Viết chương trình tích của 10 số tự nhiên đầu tiên.{dùng while...do..}
P=1.2.3.4.5.6.7.8.9.10
Program HOC24;
var P: integer;
i: byte;
begin
i:=1; P:=1;
while i<=10 do
begin
p:=p*i;
i:=i+1;
end;
write('P = ',p);
readln
end.
b) Em hãy viết chương trình Tính tổng của 20 số tự nhiên đầu tiên bằng câu lệnh for … do và while… do ?
Sử dụng vòng lặp while...do:
program TinhTong20SoTNN;
var
i, sum: integer;
begin
i := 1;
sum := 0;
while i <= 20 do
begin
sum := sum + i;
i := i + 1;
end;
writeln('Tong cua 20 so tu nhien dau tien la: ', sum);
end.
Sử dụng vòng lặp for...do:
program TinhTong20SoTNN;
var
i, sum: integer;
begin
sum := 0;
for i := 1 to 20 do
sum := sum + i;
writeln('Tong cua 20 so tu nhien dau tien la: ', sum);
end.
Câu 2. Chương trình dịch trong ngôn ngữ lập trình Pascal là chương trình dùng để làm gì?
A. Dịch ngôn ngữ máy sang ngôn ngữ lập trình
B. Dịch ngôn ngữ lập trình sang ngôn ngữ máy
C. Dịch từ ngôn ngữ tự nhiên sang ngôn ngữ lập trình
D. Dịch từ tiếng Anh sang tiếng Việt
Câu 3. Ngôn ngữ máy tính là ngôn ngữ như thế nào?
A. Là một dãy bit gồm 2 số 0 và 1
B. Là một dãy bít gồm 2 số 1 và 2
C. Là một dãy bít chỉ gồm có số 0
D. Là một dãy bit chỉ gồm có số 1
Câu 4. Trong pascal để lưu một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Vào Fileà save d. Alt + F4
Câu 8. Ngôn ngữ được sử dụng để viết chương trình là gì?
A. Ngôn ngữ lập trình
B. Ngôn ngữ máy
C. Ngôn ngữ tự nhiên
D. Ngôn ngữ tiếng Việt
Câu 9. Vì sao cần phải viết chương trình máy tính?
A. Để con người điều khiển máy tính một cách đơn giản và hiệu quả hơn
B. Vì con người muốn máy tính thực hiện các công việc rất đa dạng và phức tạp
C. Vì máy tính và con người rất hiểu nhau
D. Vì máy tính rất thông minh
Chủ đề 2. Làm quen với chương trình và ngôn ngữ lập trình
Câu 2. Từ khóa nào dùng để khai báo tên chương trình?
a. Integer b. Var c. Const d. Program
Câu 5 : Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?
a. a8b b. beginend c. begin d. Bai tap
Câu 8. Trong pascal để lưu một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Vào Fileà save d. Alt + F4
Câu 9. Trong pascal để chạy một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Ctrl+F9 d. Alt + F4
Câu 10. Trong pascal để dịch một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Ctr+F9 d. Ctrl + F5
Chủ đề 3. Chương trình máy tính và dữ liệu
Câu 3. Ký hiệu của phép toán chia trong ngôn ngữ lập trình pascal được viết như thế nào?
A. X B. * C. / D. ^
Câu 5. Phép so sánh “<=” là ký hiệu của phép so sánh nào sau đây?
A. Bằng nhau B. Khác nhau C. Lớn hơn hoặc bằng D. Bé hơn hoặc bằng
Câu 6. Phép so sánh “=>” là ký hiệu của phép so sánh nào sau đây?
A. Bằng nhau B. Khác nhau C. Lớn hơn hoặc bằng D. Bé hơn hoặc bằng
Câu 7. Phép toán DIV trong pascal là phép toán gì?
B. Phép chia b. Phép nhân c. Chia lấy phần nguyên d. Chia lấy phần dư
Câu 9. Kiểu dữ liệu của biểu thức A là gì? A := 4+5- 2
A. Số nguyên B. Số thực C. Xâu ký tự D. Ký tự
Câu 10. Kiểu dữ liệu của biểu thức A là gì? A := ‘4+5-2’
A. Số nguyên B. Số thực C. Xâu ký tự D. Ký tự
Chủ đề 4. Sử dụng biến trong chương trình
Câu 2: Khai báo nào sau đây đúng?
A. Var x, y: Integer; B. Var x, y=Integer;
C. Var x, y Of Integer; D. Var x, y := Integer;
Câu 3: Trong Pascal, từ khóa để khai báo biến là gì?
A. Const B. Begin C. Var D. Uses
Câu 4: Trong Pascal, từ khóa để khai báo hằng là gì?
A. Const B. Begin C. Var D. Uses
A. X:=4.1; B. X:=324.2 C. A:= ‘3242’; D. A:=3242 ;
Câu 7: Khai báo sau có ý nghĩa gì?
Var a: Real; b: Char;
A. Biến a thuộc kiểu dữ liệu số thực và biến b thuộc kiểu dữ liệu kí tự
B. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu xâu kí tự
C. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu kí tự
D. Biến a và b đều kiểu số thực
Câu 10: Đại lượng được đặt tên dùng để lưu trữ dữ liệu, có giá trị không đổi trong suốt quá trình thực hiện chương trình được gọi là gì?
A. Tên B. Từ khóa C. Biến D. Hằng
Chủ đề 5. Từ bài toán đến chương trình
Câu 4: Hãy xác đinh bài toán sau: "Tính tổng của hai số a và b, biết a và b được nhập vào từ bàn phím?”
A. INPUT: Hai số a và b. OUTPUT: Tổng của a và b.
B. INPUT: Tổng của a và b. OUTPUT: Số a và b.
C. INPUT: Số a. OUTPUT: Số b.
D. INPUT: Số b. OUTPUT: Số a.
Câu 5: Hãy chọn phát biểu đúng trong các phát biểu sau?
A. Các bước giải bài toán trên máy tính là: Mô tả thuật toán → Xác định bài toán → Viết chương trình
B. Cần phải xác định bài toán trước khi giải bài toán trên máy tính
C. Máy tính có hiểu được chương trình viết bằng ngôn ngữ tự nhiên
D. Với mỗi bài toán cụ thể, phải lựa chọn ngôn ngữ lập trình phù hợp rồi mới xây dựng thuật toán giải bài toán đó
Câu 6: Hãy chọn phát biểu sai trong các phát biểu sau?
A. Việc thực hiện cả 3 bước khi giải bài toán trên máy tính là cần thiết, nhất là đối với bài toán phức tạp
B. Xác định bài toán là xác định rõ các điều kiện cho trước và kết quả cần thu được
C. Dãy hữu hạn các thao tác cần thực hiện để giải một bài toán được gọi là thuật toán
D. Đối với mỗi bài toán cụ thể chúng ta chỉ có 1 thuật toán duy nhất để giải bài toán đó trên máy tính
Câu 9: Mô tả thuật toán là làm gì?
A. Liệt kê các bước thực hiện công việc.
B. Liệt kê các cách thực hiện công việc.
C. Liệt kê một bước thực hiện công việc.
D. Liệt kê hai bước thực hiện công việc
Câu 10: Mô tả thuật toán pha trà mời khách
+ B1: Tráng ấm, chén bằng nước sôi
+ B2: Rót nước sôi vào ấm và đợi khoảng 3 đến 4 phút.
+ B3: Cho trà vào ấm
+ B4: Rót trà ra chén để mời khách.
A. B1- B3-B4- B2
B. B1- B3- B2-B4
C. B2-B4-B1-B3
D.B3-B4-B1-B2
Chủ đề 6. Câu lệnh điều kiện
Câu 4: Ta có 2 lệnh sau:
x:= 8; If x>5 then x := x +1; Giá trị của x là bao nhiêu?
A. 5 B. 9 C. 8 D. 6
Câu 6: Để tìm giá trị lớn nhất của 2 số a, b thì ta viết như thế nào?
A. Max:=a; If b>Max then Max:=b; B. If a<b then Max:=a else Max:=b;
C. Max:=b; If a>Max then Max:=a; D. If a> Min then Max:=b else Max:= a;.
Câu 9: Chọn câu lệnh Pascal hợp lệ trong các câu sau:
A. If x := a + b then x : = x + 1; B. If a > b then max = a;
C. If a > b then max := a else max : = b; D. If 5 := 6 then x : = 100;
Câu 10: Hãy cho biết giá trị của biến X bằng bao nhiêu sau khi thực hiện câu lệnh:
X:= 10;
IF (91 mod 3) = 0 then X :=X+20;
A. 10 B. 30 C. 2 D. 1
****** HẾT ******