1/ 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ả
Những câu hỏi liên quan
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ả.
Vì x= 1<5 nên sẽ thực hiện câu lệnh write(‘Hoa hau’); → kết quả ra màn hình là nội dung trong dấu nháy đơn.
Đáp án: C
Đúng 0
Bình luận (0)
Hãy đưa ra kết quả trong đoạn lệnh:
x:=10; While x<=8 do
write(‘a’);
write(‘b’);
A. x=6
B. b
C. a
D. x:=6
cho đoạn chương trình sau a:1; while a10 do write ( a); a:a+1;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:ABCDCâu 02:Câu lệnh nào sau đây viết đúngA. While ab do aa+1;B. White ab 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:ABCDCâu 03:kq:0; while 2*a b do begin a:2*a; kq:kq+1; end;A. 8B. 2C. 6D. 4Đáp án của bạn:ABCDCâ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 i1 to n do x:x+1;C. For i:1 to n do xx+1;D. For...
Đọc tiếp
cho đoạn chương trình sau a:=1; while a<10 do write ( a); a:=a+1;
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:
ABCDCâ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:
ABCDCâu 03:
kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;A. 8B. 2C. 6D. 4
Đáp án của bạn:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâu 14:
kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;A. 2B. 4C. 3D. 1
Đáp án của bạn:
ABCDCâ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:
ABCDCâ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:
ABCDCâ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:
ABCDCâu 18:
cho đoạn chương trình sau a:=1; while a<10 do begin write ( a); a:=a+1; end;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:
ABCDCâ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:
ABCDCâ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
Hãy đưa ra kết quả trong đoạn lệnh:
x=1
while x<=5:
print("Hoa hậu")
x=x+1
A. 5 từ Hoa hậu B. 4 từ Hoa hậu C. 3 từ Hoa hậu D. Không có kết quả.
Câu 25 Đoạn lệnh sau đâyx:1;While x10 dox:x+1;Khi nào thì kết thúc vòng lặp While .. do trên?A. Khi x10 B. Khi x 10 C. Khi x 10 D. Khi x10Câu 26: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì? For i:1 to 5 do write (i:3); A. 1 2 3 4 5 B. 5 4 3 2 1 C. Đưa ra i:3 D. Không đưa ra kết quả gìCâu 27: Trong n...
Đọc tiếp
Câu 25 Đoạn lệnh sau đây
x:=1;
While x<=10 do
x:=x+1;
Khi nào thì kết thúc vòng lặp While .. do trên?
A. Khi x<10 B. Khi x = 10 C. Khi x <=10 D. Khi x>10
Câu 26: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì?
For i:=1 to 5 do write (i:3);
A. 1 2 3 4 5 B. 5 4 3 2 1
C. Đưa ra i:3 D. Không đưa ra kết quả gì
Câu 27: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
A. If a=5 then a:=d+1; else a:=d+2; B. If a=5 then a:=d+1 else a:=d;
C. If a:=5 then a=d+1; else a=d+2; D. If a<=5 then a:=d+1 else; a:=d+2;
Câu 28: Cho đoạn chương trình Pascal sau:
For i := 1 to 5 do
Begin
y := i;
End;
Sau khi thực hiện đoạn chương trình trên, giá trị của y là bao nhiêu?
A. 3 B. 4 C. 5 D. 6
Câu 29: Để tính tổng S=2 + 4 + 6 … + n; em chọn đoạn lệnh:
A. For i:=1 to n do if ( i mod 2)=0 then S:=S + i;
| B. For i:=1 to n do S:= S + i; |
C. c. For i:=1 to n do if ( i mod 2)=1 then S:=S + i; | D. for i:=1 to n do if ( i mod 2)<>0 then S:=S + i; |
Câu 30: Cho đoạn chương trình Pascal sau:
x:=3;
For i:=1 to 7 do x:= x+1;
Sau khi thực hiện câu lệnh For, giá trị của x là bao nhiêu?
A. 9 B. 7 C. 10 D. 3
Câu 31: Tìm giá trị của S trong đọan chương trình dưới đây:
S := 0;
For i := 1 to 5 do S := S + i;
A. S = 0 B. S = 1 C. S = 5 D. S = 15
Cho đoạn lệnh sau: X:=100; Y:=50;IF x<y then X:=X-20 else y:=y-3; Em hãy cho biết kết quả sau khi thực hiện đoạn lệnh trên? Giải thích kết quả? *
If x<y then x:=x-20 else y:=y-3;
x=100, y=50 .x>y -> ĐK đúng -> x:=x-20=100-20=80
Vậy sau khi thực hiện đoạn lệnh trên thì x=80, y=50
Đúng 0
Bình luận (0)
viết chương trình pascal sử dụng câu lệnh lặp while do để tính tổng s=1+1/2^2+1/3^2+...+1/n^2,n là số nguyên nhập từ bàn phím.In kết quả ra màn hình yêu cầu đưa ra 4 dấu cách và 2 chữ số thập phân sau dấu phẩy
Program HOC24;
var i,n: integer;
s: real;
begin
write('Nhap n: '); readln(n);
i:=1;
while i<=n do
begin
s:=s+1/sqr(i);
i:=i+1;
end;
write('S= ',s:8:2);
readln
end.
Đúng 2
Bình luận (0)
Câu 1: Để ngăn cách giữa câu lệnh trong lập trình pascal: chấm phẩy (;), chấm (.), 2 chấm (:), phẩy (,)
Câu 2: Viết câu lệnh đưa ra màn hình thông báo: Khong duoc dot Phao!
Câu 3: Viết câu lệnh đưa ra kết quả chu vi c của hình thang
1: ;
2: write('Khong duoc dot Phao!');
3: write(c);
Đúng 0
Bình luận (0)
Cho đoạn chương trình ,hãy cho biết kết quả in ra màn hình a = [3,4,5,6,7,8] def findX(x): i=0 while i
Câu 35: Đoạn lệnh sau đây sẽ cho kết quả là gì?ketqua : 1; While ketqua2 do writrln(ketqua);A. In ra vô hạn số 1 trên một cột B. In ra các số từ 1 đến 10C. Chương trình báo lỗi D. In ra vô hạn số 1 trên một dòngCâu 36: Giả sử a:2; thì sau câu lệnh For i:1 to 3 do a:a*a; a nhận giá trị bằng bao nhiêu?A. 16 B. 256 C. 64 D. 128
Đọc tiếp
Câu 35: Đoạn lệnh sau đây sẽ cho kết quả là gì?
ketqua := 1; While ketqua<2 do writrln(ketqua);
A. In ra vô hạn số 1 trên một cột B. In ra các số từ 1 đến 10
C. Chương trình báo lỗi D. In ra vô hạn số 1 trên một dòng
Câu 36: Giả sử a:=2; thì sau câu lệnh For i:=1 to 3 do a:=a*a; a nhận giá trị bằng bao nhiêu?
A. 16 B. 256 C. 64 D. 128