a) sai:
sửa: for i:=1 to 10 do write('a');
b) Đúng
c) Đúng
a) Sai
Sửa lại: for i:=10 downto 1 do write('a');
b) Đúng
c) Đúng
Câu 1: Cho 1 vài ví dụ về hoạt động lặp đi lặp lại trong cuộc sống?
Câu 2: Các câu lệnh lặp đúng hay sai? Nếu sai sửa lại cho đúng?
a) For i:=10 to 1 do write('a');
b) For i:=1 to 10 do write('a');
c) For i:=1 to 10 do write('a'); write('b');
Bài 3: For i:=1 to n do readln(a); lặp mấy lần?
Bài 4: Cho đoạn chương trình sau: S:=0; For i:= 1 to 5 do S:=S+i;
Hỏi sau khi kết thúc chương trình thì S bằng bao nhiêu?
Bài 5: Viết chương trình tính tổng của 10 số tự nhiên đầu tiên.
Làm nhanh nhanh giúp em nha mấy anh mấy chị. Cảm ơn trước nha. :))
Các câu lệnh Pascal sau đúng hay sai?Hãy chỉ ra chỗ sai và sửa lại nếu có
a.for i:=1 to 10;do x:=x+1;
b.for i:=10 to 1 do x:=x+1;
c.while i:=1 do t=10;
d.while a<=b;do write('b lon hon a');
Câu 1: Câu lệnh pascal nào sau đây là hợp lệ?
a) For i:=100 to 1 do writeln(‘A’);
b) For i:=1.5 to 10.5 do writeln(‘A’);
c) For i= 1 to 10 do writeln(‘A’);
d) For i:= 1 to 10 do writeln(‘A’);
Câu 2: Lệnh lặp For, mỗi lần lặp giá trị của biến đếm thay đổi như thế nào?
A. Tăng 1
B. Tăng 2
C. Tăng 3
D. Tăng 4
Câu 4: Vòng lặp for ..do là vòng lặp:
A. Biết trước số lần lặp
B. Chưa biết trước số lần lặp
C. Biết trước số lần lặp nhưng giới hạn là <=50
D. Biết trước số lần lặp nhưng giới hạn là >=50
Câu 5: Với ngôn ngữ lập trình Pascal câu lệnh lặp for i:=1 to 10 do x:=x+1;
thì biến đếm i phải được khai báo là kiểu dữ liệu: *
A. Integer
B. Real
C. String
D. Tất cả các kiểu trên đều được
Câu 6: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :
s:=0;
for i:=1 to 5 do
s := s+i;
writeln(s);
Kết quả in lên màn hình là của s là :
a) 11
b) 55
c) 101
d) 15
Câu 7: Để tính tổng S=1+3 + 5 + … + n; em chọn đoạn lệnh:
a) for i:=1 to n do
if ( i mod 2)=0 then S:=S + 1/i; c) for i:=1 to n do if ( i mod 2) < > 0 then S:=S + i;
b) for i:=1 to n do
if ( i mod 2)=0 then S:=S + i
Else S:= S + i; d) for i:=1 to n do if ( i mod 2)=0 then S:=S + i;
Câu 8: Để đếm có bao nhiêu số lẻ nhỏ hơn hay bằng n ; em chọn đoạn lệnh:
a) for i:=1 to n do
if ( i mod 2)< >0 then S:=S + 1; c) for i:=1 to n do if ( i mod 2) =0 then S:=S + 1;
b) for i:=1 to n do
if ( i mod 2)=0 then S:=S + i ; d) for i:=1 to n do if ( i mod 2)=0 then S:=S + i;
III. Bài tập thực hành: Viết chương trình nhập vào 1 số nguyên n. Viết ra 20 các số chẳn tiếp theo lớn hơn số n.
GIÚP VỚI !!!
Câu 1: Câu lệnh lặp nào bên dưới có dạng đúng?
A. For i= 1 to 10 do writeln(‘A’);
B. For i:=1.5 to 10.5 do writeln(‘A’);
C. For i:= 1 to 10 do writeln(‘A’);
D. For i:=100 to 1 do writeln(‘A’);
E. x:=10; While x=10 do x=x+5;
F. x:=10; While x=10 to x:=x+5;
G. x:=10 While x=10 do x:=x+5;
H. x:=10; While x=10 do x:=x+5;
S:=0; For i := 1 to 10 do S:= i+5: write(S) câu lệnh trên for lặp lại mấy lần
Trong các câu lệnh sau đây,câu lệnh nào đúng ?
a. While i :=1 do t :=10
b.While a<=b;do write('b khong nho hon a')
c.i :=1;while i <10 do i :=i+2;
d.While 1=1 do write('chao cac ban')
Giúp mình với ạ !
Mọi người giúp em với :<
Câu 1: Để in ra màn hình các số nguyên từ 1 đến 10, câu lệnh nào dưới đây đúng?
a. For i:=10 to 1 do write(i);
b. For i:=1 to 10 do write('i':2);
c. For i:=0 to 10 do write(i);
d. For i:=1 to 10 do write(i:2);
Câu 2: Cho biết số lần lặp của đoạn chương trình sau: For i:=-1 to 1 do write(i);
a. 0
b. 1
c. 2
d. Không xác định
Câu 3: Cho biết kết quả của đoạn chương trình sau: S:=0; for i:=1 to 100 do if (i mod 2=0) then write(i:2);
a. In ra màn hình các số nguyên từ 1 đến 100
b. In ra màn hình các số nguyên dương nhỏ hơn 100
c. In ra màn hình các số nguyên lẻ nhỏ hơn 100
d. In ra màn hình các số nguyên chẳn có giá trị nằm trong khoảng 2 đến 100
Câu 4: Sử dụng câu lệnh lặp để in ra màn hình tổng các số nguyên dương lẻ nhỏ hơn 100 (lưu ý: chỉ cần viết lệnh không cần viết thành chương trình hoàn chỉnh)
Các câu lệnh Pascal sau đúng hay sai, chỉ ra chỗ sai (nếu có)
a/ For i:=1 to 10; do x:=x+1;
b/ For i:=10 to 1 do x:=x+1;
c/ For i:= 1 to 10 do x:=x+1;
Cho các câu lệnh sau chỉ ra câu lệnh đúng:
A: for i:=1 to 10; do x:=x+1;
B: for i:=1 to 10 do x:=x+1;
C: for i:=10 to 1 do x:=x+1;
D: for i=10 to 1 do x:=x+1;
