uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 10 do
t:=t+i;
write(t);
readln;
end.
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 10 do
t:=t+i;
write(t);
readln;
end.
1.Em hiểu câu lệnh lặp nào trong pascal theo nghĩa nào sau đây ?
A.câu lệnh lặp là câu lệnh được sử dụng để chỉ thị cho máy tính thực hiện cấu trúc lặp
B.Một câu lệnh lặp có thể thay cho nhiều câu lệnh khác nhau
C.câu lệnh lặp chỉ là tên của 1 loại câu lệnh trong pascal
D.cả A,B và C đều sai
2.Trong câu lệnh lặp for<biến đếm>:=<giá trị đầu>to<giá trị cuối>do<câu lệnh>; thì biến đếm thuộc kiểu dữ liệu gì?
A.kiểu kí tự.
B.kiểu số thực
C.kiểu số nguyên
D.kiểu số thực hoặc số nguyên
3.Trong câu lệnh For i:=1 to 20 do write (‘*’); số vòng lặp là:
A.1. B.19. C.20. D.21
4.câu lệnh nào dùng để in ra màn hình sau ‘Pascal’?
A.for i:=1 to 10 do writeln (‘Pascal’)
B. for i:=1 to 10 writeln (‘Pascal’)
C. for i:=1 to 10 do writeln (‘Pascal’); for i:=1 to 10 do writeln (Pascal);
5.câu lệnh nào dùng để in ra màn hình các số lẻ từ 1 đến 10?
A. for i:=1 to 10 do writeln (‘i’);
B. for i:=1 to 10 do writeln (i);
C. for i:=1 to 10 writeln (‘i’);
D. for i:=10 to 1do writeln (‘i’);
mấy bẹn xinh trai,gái đẹp giúp hộ mình nhe😇
viết chương trình tính tổng các số từ 1 đến n bằng lệnh lặp repeat until
Câu 1: Sử dụng vòng lặp for ... do, viết chương trình tính tổng của 10 số tự nhiên đầu tiên ?Câu 2: Viết chương trình tìm xem có bao nhiêu số dương trong N số nhập vào từ bàn phímCâu 3: Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, và dừng màn hình để có thể quan sát
1) Trong đoạn lệnh sau đây, chương trình đã thực hiện bao nhiêu vòng lặp?
S:=0; i:=0;
While S<=20 do
Begin
S:=S+i; i:=i+1;
end;
a) 2 b) 4 c) 8 d) vô hạn
2) Trong đoạn lệnh sau đây, chương trình đã thực hiện bao nhiêu vòng lặp?
x:=0;
For i:=1 to 5 do x:=x+3;
a) 1 b) 3 c) 5 d) 15
3) Sau khi thực hiện đoạn chương trình sau, giá trị của biến x bằng bao nhiêu?
x:=0;
For i:=1 to 5 do x:=x+3;
a) 1 b) 3 c) 5 d) 15
4) Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu?
S:=0; i:=0;
While S<=20 do
Begin S:=S+i; i:=i+1; end;
a) 18 b) 21 c) 25 d) 52
5) Đoạn chương trình sau đây đã mắc phải lỗi gì?
a:=5;
While a<=6 do Writeln(‘A’);
a) Sử dụng sai cú pháp lệnh While ... do
b) Cho biết trước số lần lặp
c) Không cho biết trước số lần lặp
d) Lặp vô hạn
6) Trong ngôn ngữ lập trình Pascal, câu lệnh For ... do là lệnh:
a) Không cho biết trước số lần lặp
b) Cho biết trước số lần lặp
c) Biết trước hay không biết trước số lần lặp đều sử dụng được
d) Cả a, b, c đều sai
7) Trong ngôn ngữ lập trình Pascal, câu lệnh lặp được dùng để thể hiện:
a) Cấu trúc lặp c) Cấu trúc điều kiện
b) Cấu trúc rẽ nhánh d) Cấu trúc mảng
8) Trong ngôn ngữ lập trình Pascal, lệnh lặp với số lần chưa biết trước là câu lệnh:
a) For ... do c) If ... then ...
b) While ... do d) If ... then ... else...
9) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây hợp lệ?
a) For i:=10 to 1 do Writeln(‘A’);
b) For i:=10.5 to 1.5 do Writeln(‘A’);
c) For i=1 to 10 do Writeln(‘A’);
d) For i:=1 to 10 do Writeln(‘A’);
10) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây hợp lệ?
a) x:=10; While x:=10 do x:=x+5;
b) x=10; While x=10 do x=x+5;
c) x:=10; While x=10 do x:=x+5;
d) x=10; While x:=10 do x=x+5;
cho mình hỏi trong câu lệnh lặp VD for i:=1 to 10 do...
thì mình có thể bắt đầu khôn gphair từ 1 mà từ số khác đc ko
B1: Trong các hoạt động sau đây hoạt động nào là hoạt động lặp với số lần chưa biết trước:
A. tính tổng các số tự nhiên từ 1 đến 20.
B. Nhập các số nguyên cho đến khi đủ 50 số
C. Mỗi ngày tập TD 2 lần
D. Nhập dữ liệu từ bàn phím cho đến khi nhập xong dữ liệu khi dừng
B2: Đoạn lệnh sau đây in ra kết quả gì?
s:=0; while s<10 do begin s:=s+1;
Writeln(s); end;
A. In ra các số từ 1 đến 9.
B. In ra các số từ 1 đến 10.
C. In ra các số 1.
D. Không có đáp án đúng.
B3: Hãy cho biết đâu là đoạn lệnh lặp bằng câu lệnh While...do để tính tổng S=1+2+...+10?
A. S:=0; while i<10 do S:=S+i;
B. S:=0; i:=0; while i<11 do begin S:=S+i; i:=i+1; end;
C. S:=0; i:=1; while i do S:=S+i; i:=i+1;
D. S:=0; i:=0; while i<=10 do begin S:=S+i; i:=i+1; end;
I-Trắc nghiệm
Câu 1:Khi nào thì câu lệnh lặp For...do kết thúc ?
Câu 2:Khi sử dụng lệnh lặp While...di cần chú ý đến điều gì ?
Câu 3:Trong Pascal câu lệnh lặp với số lần chưa xác định trước có dạng như thế nào>
Câu 4:Việc đầu tiên mà câu lệnh lặp While...do cần thực hiện gì?
Câu 5 :Em hãy tìm hiểu tác dụng của các phần mềm.
II-Tự luận
Câu 1:Viết cú pháp của lệnh lặp với số lần chưa biết trước .Nêu hoạt động của của câu lệnh
Câu 2:Trong lập trình cấu trúc lặp dùng dể làm gì?Nêu dạng tổng quát và cách thực hiện lệnh của câu lệnh lặp while... do trong ngôn ngữ lập trình pascal.
Sử dụng câu lệnh lặp do while-do để tính tích các số tự nhiên từ 1 đến 100.