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.

29 tháng 3 2019

Chào bạn . Bạn nên kiểm tra lại đề bài , đề bài chưa hoàn chỉnh và câu lệnh for không thể chạy được . Nếu đề đã có là J:=30 sao đề lại gán lại là J:=i-5 ( nó sẽ lấy 1-5 ; 2-5 ,....)

11 tháng 5 2021

Màn hình sẽ in ra giá trị: 3 7

Giải thích:

Câu lệnh if i mod 3=0 then j:=j+1 có nghĩa là j bằng một cộng với số các số chia hết cho 3.

k:=k+j có nghĩa là bằng bốn cộng với giá trị của j đã tìm.

14 tháng 5 2021

For i:=1 to 5 do => có 5 vòng lặp, các vòng sẽ có gtri j,k tương ứng là:

vòng 1: 4,7

vòng 2: 6,13

vòng 3:8,21

vòng 4: 10,31

vòng 5: 12;43

Vậy writeln(j,k)  sẽ in ra 12 43. Ở đây vòng lặp không có điều kiện trước đó nên không cần xét nhé!

16 tháng 4 2023

+)Vòng lặp thứ nhất: lặp khi i=1, cộng giá trị hiện tại của S với i, ta có S = 0 + 1 = 1.

+)Vòng lặp thứ hai: lặp khi i=2, cộng giá trị hiện tại của S với i, ta có S = 1 + 2 = 3.

+)Vòng lặp thứ ba: lặp khi i=3, cộng giá trị hiện tại của S với i, ta có S = 3 + 3 = 6.

+)Vòng lặp thứ tư: lặp khi i=4, cộng giá trị hiện tại của S với i, ta có S = 6 + 4 = 10.

+)Vòng lặp thứ năm: lặp khi i=5, cộng giá trị hiện tại của S với i, ta có S = 10 + 5 = 15.

Sau khi kết thúc vòng lặp, giá trị hiện tại của i sẽ là 6 và giá trị hiện tại của S sẽ là 15.

16 tháng 4 2023

C.ơn

 

4 tháng 8 2019

Đáp án C

17 tháng 3 2023

a/

Giá trị đầu của vòng lặp là 1, giá trị cuối là 5 => biến đếm của k lần lượt tăng thành 1 dãy số 1,2,3,4,5 

k mod 2 =0 -> nếu k là số chẵn thì biến i tăng lên 1 đơn vị. Dãy số gồm 2 số chẵn (2,4) => i tăng 2 đơn vị => i = -1 + 1 + 1 = 1

j = j + i => j = 20 + 1 = 21

Vậy i=1; j=21

b/

Lần lặp thứ nhất: m=0*10 + 7 = 7 ; n = 12

Lần lặp thứ 2: m=7*10 + 2 = 72; n= 1

Lần lặp thứ 3: m=720 + 1 = 721; n=0 (n=0 => dừng vòng lặp)

Vậy m=721

Bài 2: 

a: Input: 50 số từ 1 đến 50

Output: Tổng các số nguyên tố

c: Viết chương trình:

uses crt;

var i,j,t,kt:integer;

begin

clrscr;

t:=0;

for i:=2 to 50 do 

  begin

kt:=0;

for j:=2 to trunc(sqrt(i)) do 

  if i mod j=0 then kt:=1;

if kt=0 then t:=t+i;

end;

writeln(t);

readln;

end.

13 tháng 5 2019

Đáp án D

Câu 20: Cho đoạn chương trình:           j:= 0;                                                            For i:= 1 to 5 do j:= j + i;Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?A. 12                     B. 15                                                     C....
Đọc tiếp

Câu 20: Cho đoạn chương trình:           j:= 0;

                                                            For i:= 1 to 5 do j:= j + i;

Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?

A. 12                     B. 15                                                     C. 22                     D. 42.

Câu 20: Đoạn chương trình sau giải bài toán nào?

      For I:=1 to M do

          If (I mod 3 = 0) and (I mod 5 = 0) then

             T := T + I;

   A. Tổng các số chia hết cho 3 hoặc 5 trong phạm vi từ 1 đến M

   B. Tổng các số chia hết cho 3 và 5 trong phạm vi từ 1 đến M

C. Tổng các số chia hết cho 3 trong phạm vi từ 1 đến M

 D. Tổng các số chia hết cho 5 trong phạm vi từ 1 đến M

Câu 21: Sau khi thực hiện đoạn chương trình sau:

   S:=10;

   For i:=1 to 4 do S:=S+i;

   Giá trị của biến S bằng bao nhiêu?

   A. 20

   B. 14

   C. 10

   D. 0

Câu 22: Cho các câu lệnh sau hãy 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;

Câu 23: Với ngôn ngữ lập trình Passcal 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 nào?

   A. Integer

   B. Real

   C. String

   D. Tất cả các kiểu trên đều được

Câu 24: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 240

   A. 1

   B. 240

   C. 241

   D. Tất cả đều sai

Câu 25: Tính tống S = 1 + 2 + 3 + … + n + … cho đến khi S>108. Điều kiện nào sau đây cho vòng lặp while – do là đúng:

   A. While S>=108 do

   B. While S < 108 do

   C. While S < 1.0E8 do

   D. While S >= E8 do
 

Câu 26: Hãy đưa ra kết quả trong đoạn lệnh:

   x:=1; While x<=5 do write(‘Hoa hau’);

   A. x:=1

   B. X>=5

   C. Hoa hau

   D. Không có kết quả.

Câu 27: Câu lệnh sau giải bài toán nào:

   While M <> N do

   If M > N then M:=M-N else N:=N-M;

   A. Tìm UCLN của M và N

   B. Tìm BCNN của M và N

   C. Tìm hiệu nhỏ nhất của M và N

   D. Tìm hiệu lớn nhất của M và N

Câu 28: Hãy cho biết kết quả của đoạn chương trình dưới đây:

a:=10; While a < 11 do write (a);

   A. Trên màn hình xuất hiện một số 10

   B. Trên màn hình xuất hiện 10 chữ a

   C. Trên màn hình xuất hiện một số 11

   D. Chương trình bị lặp vô tận

Câu 29: Cho biết câu lệnh sau Do thực hiện mấy lần trong đoạn chương trình sau:

   i := 5;

   While i>=1 do i := i – 1;

   A. 1 lần

   B. 2 lần

   C. 5 lần

   D. 6 lần

Câu 30: Việc đầu tiên mà câu lệnh While ... do cần thực hiện là gì?

   A. Thực hiện < câu lệnh > sau từ khóa Do

   B. Kiểm tra giá trị của < điều kiện >

   C. Thực hiện câu lệnh sau từ khóa Then

   D. Kiểm tra < câu lệnh >
quẹc quẹc, hép mi, ét o ét ;-;
ai làm đc hết xứng đáng nuôi tui ;-;

5
11 tháng 3 2022

đăng từng câu 1

11 tháng 3 2022

khum ai nuôi đc cj đâu =))