K
Khách

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.

30 tháng 12 2020

Đầu tiên n=1

Cứ tăng i lên 1 đơn vị thì n lúc sau bằng n ban đầu +1

Lần thứ nhất n=1+1=2

Lần thứ 2: n=2+1=3

Lt3: n=3+1=4

Lt4: n=4+1=5

Lt5: n=5+1=6

===> C.6

30 tháng 12 2020

Biết ngay đề bài có vấn đề mà, cách tốt nhất để xem nó in ra màn hình cái gì là đánh vô Free Pascal

undefined

undefined

Đó, xem lại đề bài đi bạn :v

Câu 1: B

Câu 2: 

a: D

b: A

2 tháng 3 2022

n:=0;

for i:= 1 to 10 do n:=n+i;

Giải thích : n:=n+i nghĩa là giá trị ban đầu cộng lần lượt với i ( dãy số từ 1 đến 10) n sẽ thay đổi giá trị sau mỗi lần cộng

Hoạt động của câu lệnh :

Vòng 1 : n:=n+i; <=> n=0+1=1;

Vòng 2: n:=n+i <=> n=1+2=3 ;

Vòng 3 : n:=n+i <=> n=3+3=6;

Vòng 4: n:=n+i <=> n=6+4=10;

Vòng 5 : n:=n+i <=> n=10+5=15;

Vòng 6 : n:=n+i <=> n=15+6=21;

Vòng 7: n:=n+i <=> n=21+7=28;

Vòng 8 : n:=n+i <=> n=28+8=36;

Vòng 9 : n:=n+i <=> n=36+9=45;

Vòng 10 : n:=n+i <=> n=45+10=55;

Vậy đoạn chương trình trên có giá trị n=55

2 tháng 3 2022

TL: 

n = 55 nhé 

@@@@@@@@@@@@ 

k cho mk 

HT

19 tháng 3 2022

B

4. Câu hỏi bài tập:4.1/ Tìm hiểu câu lệnh lặp dưới đây và cho biết khi kết thúc câulệnh giá trị của biến S và biến n bằng bao nhiêu?S:=0; n:=0;While S<=10 doBeginn:=n+1;S:=S+n;End;Trả lời:Giá trị của biến S sau khi thực hiện=...............Giá trị của biến n sau khi thực hiện=...............4.2/ Gạch dưới chỗ sai của các câu lệnh sau và viết lại câu lệnh đúng:a) While X:= 10 do X:=...
Đọc tiếp

4. Câu hỏi bài tập:
4.1/ Tìm hiểu câu lệnh lặp dưới đây và cho biết khi kết thúc câu
lệnh giá trị của biến S và biến n bằng bao nhiêu?
S:=0; n:=0;
While S<=10 do
Begin
n:=n+1;
S:=S+n;
End;

Trả lời:
Giá trị của biến S sau khi thực hiện
=...............
Giá trị của biến n sau khi thực hiện
=...............

4.2/ Gạch dưới chỗ sai của các câu lệnh sau và viết lại câu lệnh đúng:
a) While X:= 10 do X:= X+1;→............................................................
b) While X > 5 for X:= X-1→ .............................................................
c) While X< 10 do X = 5 ;→.................................................................
d) While X <> 0 ; do X:=X-1;→...........................................................

Sửa lại chương trình
Var a : integer;
Begin
a:=5;
While a<6 do begin

writeln(‘A’);
a := a + 1 ;
end;

end.

5. Bài tập thực hành:
Bài 1: Viết chương trình : “BAI8B1” tính tổng của các số tự nhiên liên
tiếp cho đến khi tổng lớn hơn 1000 thì dừng. Cho biết tổng tìm được và
con số cuối cùng được cộng vào:

Hướng dẫn Chương trình

1. Khai báo tên chương trình
2. Khai báo thư viện
3. Khai báo biến: S,n : số nguyên
4. Bắt đầu chương trình
5. Xóa màn hình
6. Gán S 0;n 1;
7. Trong khi S<=1000 thực hiện:
bắt đầu
SS+n
n n+ 1
kết thúc
8. In ra tổng S
9. In ra số n cuối cùng được cộng
10. Tạm dừng chương trình
11. Kết thúc chương trình

1....................................................................
2....................................................................
3....................................................................
4....................................................................
5....................................................................
6....................................................................
7....................................................................

......................................................................

......................................................................

......................................................................

......................................................................
8....................................................................
9....................................................................
10..................................................................
11..................................................................

1

Bạn tách ra đibạn