Sau khi thực hiện đoạn chương trình sau. khi kết thúc giá trị của biến S sẽ bằng bao nhiêu?
S:=0; n:=0 ;
while S<=3 do
begin
n:=n+2
S:=s+10
end
A.12 B.10 C.6 D.2
1/ Sau khi chạy đoạn chương trình sau giá trị của a, b bằng bao nhiêu? a:=4 ; b:=12; If a<b then a:=a+b else Begin a:=a-b; b:=b+a end;
2/ Cho đoạn chương trình sau:a:=3 ;b:=3;c:=0 if a=b then c:=a-b+1 c:=c+1;sau khi thực hiện đoạn chương trình trên , giá trị của c là bao nhiêu?mai mình thi rồi!
bài 5 dưới đây là một đoạn chương trình Pascal S:=0; For i:=0 to 5 do Begin S := S + 2; End; Khi thực hiện đoạn chương trình trên giá trị của S là bao nhiêu ?
Cho đoạn chương trình sau :
S:=0 ; n:=0;
While S <= 6 do
Begin
n:= n+1;
S:=S+n;
End.
Cho bt giá trị của biến S và n sau khi thực hiện đoạn chương trình trên
A. Trắc nghiệm
Câu 1: Tìm giá trị của biến S sau đoạn lệnh sau:
S:=1;
For i:=1 to 6 do S:=S+1;
A. 5 B. 6 C. 7
Câu 2: Tìm giá trị của biến S sau đoạn lệnh sau:
S:=0;
For i:=1 to 6 do S:=S+i;
A.15 B. 21 C. 28
Câu 3: Đoạn lệnh sau tương đương với câu lệnh nào sau đây?
S:=0;
For i:=1 to 6 do
If i mod 2=1 then S:=S+i;
A. S:=1+3+5; B. S:=2+4+6; C. S:=1+2+3+4+5+6;
B. Tự luận:
Câu 4:
Viết chương trình in ra màn hình tích n số tự nhiên đầu tiên, nghĩa là tính:
P=1x2x3x…n, với n là số nhập từ bàn phím. (Đây là chương trình tính giai thừa).
Câu 5*: Viết chương trình tính giá trị biểu thức A của bài 3 trong SGK trang 59.
* mình cần gấp, bn nào làm đc câu nào thì cứ làm , mk tick hết
Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' );
A.12 3 4 5 6 7 89 10
B.Đưa ra 10 khoảng trắng
C.Không có kết quả
D.1098 7 6 5 4 3 2 1
Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i');
A.iiiii
B.5678910
C.i
D.iii
Câu 3: Đoạn chương trình sau cho kết quả gì?
For i:=5 to 10 do
If i mod 5 = 0 then write (i);
Diiiii
A.1 2 3 4 5
B.1 2 3 4 5 6 7 8 9 10
C.5 10
Câu 4: Đoạn chương trình sau cho kết quả gì?
S:=1; For i:=5 to 10 do if i mod 3 = 0 then S:=S * i; Write(S);
A.54
B.15
C.50
D.151200
Câu 5: Cho đoạn chương trình sau:
a:=3; b:=2;
If a>b then a:=4 else b:=1;
Sau khi thực hiện đoạn chương trình trên cho kết quả:
A.a=3
B.b=2
C.a=4
D.b=1
Câu 6: Đoạn chương trình sau cho kết quả gì?
S:=0;
For i:=1 to 9 do S:=S+i;
Write(s);
A.45
B.40
C.55
Câu 7: Cho x là biến thực đã được gán giá trị 13.56423. Để hiện lên màn hình nội dung “x=13.6"
cần chọn câu lệnh nào sau đây?
A.Writeln(x:5);
B.Writeln(x);
C.Writeln("x=",x:5:2);
D.Writeln('x=',x:2:1);
Câu 8: Trong NNLT Pascal phát biểu nào sau đây là đúng:
A.Có phân biệt chữ hoa chữ thường.
B.Sau mỗi câu lệnh đều phải có dấu chấm phẩy.
C.Trước lệnh Else bắt buộc phải có dấu chấm phẩy.
D.Lệnh Readln trước câu lệnh End. Không nhất thiết phải có dấu chấm phẩy.
Câu 9: Để thoát khỏi chương trình Pascal ta sử dụng tổ hợp phím nào?
A.Ctrl + Q
B.Ctrl + X
C.Alt + Q
D.Alt +X
Câu 10: Vòng lặp sau đây lặp lại mấy lần?
A:=2
For i:=0 to 7 do a:=a+1;
A.6
B.7
C.8
Câu1: Mỗi câu lệnh lặp dưới đây thực hiện bao nhiêu lần lặp? Giá trị của S sau mỗi đoạn lệnh:
a)S:=21; while S<= 21 do S:=S*2;
b)S:=15; For j:=1 to 4 do S:=S-3;
c)S:=12; while S>2 do S:=S/2;
Câu 2: Số phần tử tối đa của biến mảng trong mỗi khai báo sau:
a) Var A: array[4..23] of real;
b) Var B: array[-5..39] of integer;
Mọi người giúp em với ạ! Em đang cần gấp! Em xin cảm ơn trước.🙂🙂🙂
Tìm giá trị của s, i trong đoạn chương trình sau:
S:=0; i:=0
while i<=3 do
Begin
i:=i+2;
s:=s+i;
end;