Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
thêm câu này nữa mn ạ:
Câu lệnh For i:= 3 to 10 do begin write(i); end; khi thực hiện xong sẽ viết ra số 13 7 10 14câu cuối ạ Cho câu lệnh sau: s:=0; For i:=1 to 5 do if i mod 2 = 0 then s:=s+i else s:= s+i; cho biết kết quả s ?
i = 1 < 5 ĐÚNG => s= 0+1 = 1; i= 1 + 1 = 2;
i = 2 < 5 ĐÚNG => s = 1 + 1 = 2 ; i = 2 + 1 = 3;
i = 3 < 5 ĐÚNG => s = 2 + 1 = 3 ; i = 3 + 1 = 4;
i = 4 < 5 ĐÚNG => s = 3 + 1 = 4 ; i = 4 + 1 = 5;
i = 5 = 5 ĐÚNG => s = 4 + 1 = 5 ; i = 5 + 1 = 6;
i = 6 < 5 sai => ket thuc vòng lap
Vậy kết quả S = 5
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;
có begin mà ko có end nên đoạn chương trình đó không chạy được!!!
