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.

 

cho đoạn chương trình sau a:=1; while a<10 do write ( a); a:=a+1;
Hãy cho biết kết quả của a bằng bao nhiêu?A. In ra từ 1 đến 9B. In ra từ 1 đến 10C. lặp vô hạnD. In ra 10

Đáp án của bạn:

ABCD

Câu 02:

Câu lệnh nào sau đây viết đúngA. While a<b do a=a+1;B. White a<b do a:=a+1;C. While a< b do a:=a+1;D. while a< b do ; a:=a+1

Đáp án của bạn:

ABCD

Câu 03:

kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;
Với a= 1; b=4 thì “ kq “ bằng bao nhiêu?A. 8B. 2C. 6D. 4

Đáp án của bạn:

ABCD

Câu 04:

Đoạn chương trình nào sau không bị lỗiA. For i:=1 to n do x:=x+1B. For i=1 to n do x:=x+1;C. For i:=1 to n do x=x+1;D. For i:=1 to n do x:=x+1;

Đáp án của bạn:

ABCD

Câu 05:

với a:=5; b:=6 ; ta có while b> a do b:=b+1;A. lặp vô hạnB. 1000C. 1000000D. 7

Đáp án của bạn:

ABCD

Câu 06:

Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=1 to 5 do x:=x+i;A. 15B. 5C. 0D. 20

Đáp án của bạn:

ABCD

Câu 07:

Cú pháp câu lệnh lặp biết trướcA. For < biến đếm> : = < giá trị đầu> to < giá trị cuối> do;B. For < biến đếm> = < giá trị đầu> to < giá trị cuối> doC. For < biến đếm> ; = < giá trị đầu> to < giá trị cuối> doD. For < biến đếm> : = < giá trị đầu> to < giá trị cuối> do

Đáp án của bạn:

ABCD

Câu 08:

với d:=0; while d<n do    begin d:=d+1;     if d mod 10=0 then n:=n+3;    end; wrtite(n);  Với  n=10 thì cho kết quả cuối cùng của n là bao nhiêu?

 

A. 11B. 12C. 10D. 13

Đáp án của bạn:

ABCD

Câu 09:

Cho đoạn chương trình a:=3; b:=2; while b< a do b:=b+1; kết quả của a,b sau khi kết thúc lặp làA. 3,4B. 3,3C. 2,3D. 3,2

Đáp án của bạn:

ABCD

Câu 10:

Cú pháp câu lệnh lặp chưa biết trướcA. While < điều kiện > doB. White < phép gán> do;C. While < điều kiện> do ;D. White < phép gán> do

Đáp án của bạn:

ABCD

Câu 11:

Cho đoạn chương trình a=3; b:=2; while b< a do b:=a; kết quả của a,b sau khi kết thúc lặp làA. 2,3B. 3,4C. 3,3D. 3,2

Đáp án của bạn:

ABCD

Câu 12:

Câu lệnh ghép là câu lệnh đặt giữa từ khóaA. begin;… end.B. Begin … end;C. Begin .. end.D. begin.. readln.

Đáp án của bạn:

ABCD

Câu 13:

Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=1 to 5 do x:=x+1;A. 15B. 5C. 20D. 0

Đáp án của bạn:

ABCD

Câu 14:

kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;
Với a= 2; b=5 thì “ kq “ bằng bao nhiêu?A. 2B. 4C. 3D. 1

Đáp án của bạn:

ABCD

Câu 15:

Đoạn chương trình nào sau không bị lỗiA. For i:=10 to 1 do x:=x+1;B. For i:=1 to 10 do x = x+1;C. for i:=1 to 10 do x:=x+1D. For i:=10 to 1 do x:=x+1

Đáp án của bạn:

ABCD

Câu 16:

Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=5 to 1 do x:=x+i;A. 5B. 20C. 15D. 0

Đáp án của bạn:

ABCD

Câu 17:

for i:=1 to n do if n mod 2 =0 then s:=s+i; với n =6 thì kết quả s là?A. 15B. 0C. 21D. 5

Đáp án của bạn:

ABCD

Câu 18:

cho đoạn chương trình sau a:=1; while a<10 do begin write ( a); a:=a+1; end;
Hãy cho biết kết quả của a bằng bao nhiêu?A. In ra từ 1 đến 10B. In ra 10C. In ra từ 1 đến 9D. lặp vô hạn

Đáp án của bạn:

ABCD

Câu 19:

s:= 0; for i:=1 to n do if n mod 2 =0 then s:=s+i; với n =5 thì kết quả s là?A. 15B. 1C. 5D. 0

Đáp án của bạn:

ABCD

Câu 20:

Cho đoạn chương trình a:=3; b:=2; while b< a do begin b:=a; a:=b end; kết quả của a,b sau khi kết thúc lặp làA. 2,3B. 3,3C. 3,2D. 3,4
2
8 tháng 3 2022

giúp mình vs ạ

 

23 tháng 6 2021

?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????

Câu 34: Để biểu diễn thuật toán theo sơ đồ khối, người ta dùng khối hình chữ nhật để thể hiện ý nghĩa nào sau đây:A.   Khối bắt đầu, kết thúc thuật toánB.    Khối tính toánC.    Thao tác lựa chọn theo 1 điều kiện nào đóD.   Chỉ trình tự  các bước trong thuật toánCâu 35: Để biểu diễn thuật toán theo sơ đồ khối, người ta dùng khối hình elip để thể hiện ý nghĩa nào sau...
Đọc tiếp

Câu 34: Để biểu diễn thuật toán theo sơ đồ khối, người ta dùng khối hình chữ nhật để thể hiện ý nghĩa nào sau đây:

A.   Khối bắt đầu, kết thúc thuật toán

B.    Khối tính toán

C.    Thao tác lựa chọn theo 1 điều kiện nào đó

D.   Chỉ trình tự  các bước trong thuật toán

Câu 35: Để biểu diễn thuật toán theo sơ đồ khối, người ta dùng khối hình elip để thể hiện ý nghĩa nào sau đây:

A.   Khối bắt đầu, kết thúc thuật toán

B.    Khối tính toán

C.    Thao tác lựa chọn theo 1 điều kiện nào đó

D.   Chỉ trình tự  các bước trong thuật toán

Câu 36: Để biểu diễn thuật toán theo sơ đồ khối, người ta dùng hình mũi tên để thể hiện ý nghĩa nào sau đây:

A.   Khối bắt đầu, kết thúc thuật toán

B.    Khối tính toán

C.    Thao tác lựa chọn theo 1 điều kiện nào đó

D.   Chỉ trình tự  các bước trong thuật toán

Câu 37: Để thực hiện phép tính tổng của hai số nguyên a và b ta thực hiện như sau :
A. Tong=a+b;
B. Tong:=a+b;
C. Tong:a+b;
D. Tong(a+b);


0
1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26 2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); * A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến...
Đọc tiếp
1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26

2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); *

A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20;

3, Trong câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *

A. 15; B. 12; C. 13 D. 3;

4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *

A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3
1
10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

 

26 tháng 2 2022

Sai

27 tháng 4 2017

Program Ai_nặng_hơn;

var a,b : real;

begin

writeln ('Nhập cân nặng cảu bạn a :'); readln(a);

writeln ('Nhập cân nặng cảu bạn b :'); readln(b);

if a>b then writeln ('Bạn a nặng hơn bạn b')

else if a<b then writeln ('Bạn b nặng hơn bạn a')

else writeln ('Hai bạn a và b nặng bằng nhau');

readln

end.

2 tháng 10 2017

Pascal không có dấu nha bạn!

a: a=a+b=5+8=13

b: c=a =>c=13

b=a-b=13-8=5

a=b=5

c=a-b=5-5=0

b=c=0

14 tháng 11 2021
Để chủ mèo có thể liên tục di chuyển đến khi gặp phải chủ chó (điều kiện dừng lại) ta dùng cấu trúc lặp
24 tháng 1 2022

dễ mà tự làm đi!