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.

13 tháng 3 2023

Chuyển thành while..do

s:=0; i:=1;

while i<=n do

begin

s:=s+i/2;

i:=i+1;

end;

 

Sẽ thực hiện 6 vòng lặp

16 tháng 3 2022

mọi người giúp mình với mình đag cần gấp

Chương trình thực hiện 3 vòng lặp

Câu 1: var a:array[1..100]of integer;

Câu 2: for i:=1 to 20 do write(i:4);

29 tháng 3 2023

Câu lệnh lặp sẽ được thực hiện khi giá trị của biến S là lớn hơn 0. Trong quá trình lặp, giá trị của biến i sẽ được tăng lên mỗi lần lặp cho đến khi i đạt đến giá trị n. Trong cùng mỗi lần lặp, giá trị của biến J sẽ được cập nhật bằng cách cộng thêm i^2, sau đó biến S sẽ giảm đi giá trị của i.

Khi vòng lặp kết thúc, chương trình sẽ in ra màn hình tổng S, tức là giá trị cuối cùng của biến J.

Với câu lệnh lặp như sau:

J:=0;
i:=0;
While S > 0 Do
    i:=i+1;
    J:=J+i^2;
    S:=S-i;
End;
Write(J);

 

Ví dụ, nếu ta gán S=5, thì chương trình sẽ tính tổng của các số bình phương từ 1^2 đến 5^2 và in ra giá trị đó, tức là 1^2 + 2^2 + 3^2 + 4^2 + 5^2 = 55.

18 tháng 12 2015

CHơi oẳn tù tì nè.Tích mình nhé

4 tháng 9 2015

Câu 1 : 1 thằng què

Câu 2 : dưới đất

Câu 3 : đất xấu chim next

Câu 4 : không khí

25 tháng 9 2015
  1. co 1 thang que
  2. chi xuong dat
  3. dat xau chim bay
  4. cai bong
  5.  
  6.  
  7.  
18 tháng 12 2015

Câu 1:B

Câu 2:C

Câu 3:A

**** nha

18 tháng 12 2015

Nhiều thế nhỉ. câu 1 mình nghĩ là 180

Câu 2 thì mình bó tay. Còn câu 3 thì có 1 đường