Cho đoạn chương trình sau:
s1 := ‘1010’; s2 := ‘1001010’;
write(pos(s1, s2));
Kết quả in ra màn hình là:
A. 0
B. ‘0’
C. 4
D. ‘4’
Những câu hỏi liên quan
cho đoạn chương trình sau hãy viết chương trình pascal cho đoạn chương trình
J:=1;k:=2;i:=0;
Whilei<5 do
begin
I:=i+1; J;=J+1; K:=K+J
End;
writel(j,k);
Cho đoạn chương trình: a. Chương trình trên có lỗi không? Nếu có hãy chỉ ra mã lỗi và sửa lại.b. Sửa lỗi đoạn chương trình và đưa ra yêu cầu bài toán phù hợp với chương trình đã sửa lỗi.
Đọc tiếp
Cho đoạn chương trình:
a. Chương trình trên có lỗi không? Nếu có hãy chỉ ra mã lỗi và sửa lại.
b. Sửa lỗi đoạn chương trình và đưa ra yêu cầu bài toán phù hợp với chương trình đã sửa lỗi.
SyntaxError: expected ':' Dòng 4
Thêm dấu ":" sau điều kiện
Đúng 0
Bình luận (0)
Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết sau khi thực hiện lệnh lặp giá trị của x và y là bao nhiêu? Và mỗi đoạn chương trình thực hiện bao nhiêu vòng lặp a Đoạn chương trình 1 b Đoạn chương trình 2: x: 0; y: 5 x:=1 ; y:= 5; For i:-5 to 2 do x:=x+2: For i:=3 to 7 do x:=x+2; y:=y+x; y:= y + x;
Cho biết giá trị của S,n là bao nhiêu sau khi thực hiện đoạn chương trình ? Đoạn chương trình đó thực hiện bao nhiêu vòng lặp
Viết chương trình nhập vào dãy gồm N số tìm các đoạn con có tổng bằng Kvà in tất cả ra màn hìnhInputOutput15 152 3 10 7 8 6 5 2 8 9 17 -2 0 5 102 3 107 85 2 817 -20 5 1010 151 2 3 4 5 6 7 8 9 151 2 3 4 57 815 làm bằng pascal nha mọi người giúp mình
Đọc tiếp
Viết chương trình nhập vào dãy gồm N số tìm các đoạn con có tổng bằng K
và in tất cả ra màn hình
| Input | Output |
15 15 2 3 10 7 8 6 5 2 8 9 17 -2 0 5 10 | 2 3 10 7 8 5 2 8 17 -2 0 5 10 |
10 15 1 2 3 4 5 6 7 8 9 15 | 1 2 3 4 5 7 8 15 |
làm bằng pascal nha mọi người giúp mình
program TimDoanConCoTongK; const MAX_N = 100; var a: array[1..MAX_N] of Integer; N, K: Integer; i, j, sum: Integer; begin // Nhập vào dãy số và K Write('Nhap vao so phan tu cua day: '); ReadLn(N); WriteLn('Nhap vao cac phan tu cua day:'); for i := 1 to N do begin Write('a[', i, '] = '); ReadLn(a[i]); end; Write('Nhap vao gia tri K: '); ReadLn(K); // Tìm các đoạn con có tổng bằng K WriteLn('Cac doan con co tong bang ', K, ':'); for i := 1 to N do begin sum := 0; for j := i to N do begin sum := sum + a[j]; if sum = K then begin for k := i to j do begin Write(a[k], ' '); end; WriteLn; end; end; end; end.
Chương trình trên cho phép người dùng nhập vào dãy số và giá trị K. Sau đó, chương trình sẽ tìm tất cả các đoạn con trong dãy có tổng bằng K và in chúng ra màn hình.
Ví dụ, với dãy số [1, 2, 3, 4, 5] và K = 7, chương trình sẽ in ra:
2 3 4 5 2Đây là tất cả các đoạn con có tổng bằng 7 trong dãy số đã cho.
Đúng 0
Bình luận (0)
Cho đoạn chương trình sau :
x = 1
False = x
print(False)
Hãy cho biết khi chạy chương trình sẽ cho ra kết quả gì? Giải thích?
Cho đoạn chương trình sau:m:5;for i:4 to 10m:m+i;Sau khi thực hiện xong đoạn chương trình trên giá trị biến m bằng bao nhiêu?
Đọc tiếp
Cho đoạn chương trình sau:
m:5;
for i:4 to 10m:=m+i;
Sau khi thực hiện xong đoạn chương trình trên giá trị biến m bằng bao nhiêu?
Sửa đề:
m:=5;
for i:=4 to 10 do m:=m+i;
Biến đếm i tăng lên 1 đơn vị bắt đầu từ giá trị đầu là 4 và kết thúc khi i=10.
Vậy giá của của m = 4 + 4 + 5 + 6 +7 + 8 + 9 + 10 = 53
Đúng 1
Bình luận (0)
Sửa đề:
m:=5;
for i:=4 to 10 do m:=m+i;
Biến đếm i tăng lên 1 đơn vị bắt đầu từ giá trị đầu là 4 và kết thúc khi i=10.
Vậy giá của của m = 5 + 4 + 5 + 6 +7 + 8 + 9 + 10 = 54
Đúng 0
Bình luận (0)
Câu 17. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:16; T:T -n; end;A.2 B.3 C.4 D.5Câu 18: Cho đoạn chương trình sau:S:10; x:0,5;While 6,2 doS:S-x;Hãy cho biết giá trị của S sau đoạn chương trình trên:A. 5 B. 4 C.6 D.7Câu 19. Sau khi thực hiện đoạn chương trình sau:j:0; s:1;for i:1 to 3 doj:j+1;s:j+1;Gía trị của biến j, biến s bằng?A. j4, s3 B.j:3; s4 ...
Đọc tiếp
Câu 17. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:=16; T:=T -n; end;
A.2 B.3 C.4 D.5
Câu 18: Cho đoạn chương trình sau:
S:=10; x:=0,5;
While >=6,2 do
S:=S-x;
Hãy cho biết giá trị của S sau đoạn chương trình trên:
A. 5 B. 4 C.6 D.7
Câu 19. Sau khi thực hiện đoạn chương trình sau:
j:=0; s:=1;
for i:=1 to 3 do
j:=j+1;
s:=j+1;
Gía trị của biến j, biến s bằng?
A. j=4, s=3 B.j:=3; s=4 C.j:=1; s=2 D.j:=2; s:=3
Câu 21. Gỉa sử có dòng lệnh :
for i:=0 to 9 do
a:=1+i;
Số lần lặp của lệnh gán a:=1+i là:
A.11 B.0 C.10 D.9
19 tháng 3 2022 lúc 19:24
Cho đoạn chương trình sau:i:0; T:5;While T 20 Do Begin i: i + 1; T: T*i; End;Câu 1: Đoạn lệnh trong chương trình thực hiện số vòng lặp là:A. 4B. 3C. 5D. 1Câu 2: Ý nghĩa câu lệnh lặp trong đoạn chương trình trên là:A. Tính tích đến khi nào T20 thì dừng vòng lặpB. Tính tích đến khi nào T20 thì dừng vòng lặpC. Tính tích đến khi nào T 20 thì dừng vòng lặpD. Tính tích đến khi nào T...
Đọc tiếp
Cho đoạn chương trình sau:
i:=0; T:=5;
While T < 20 Do
Begin
i:= i + 1;
T:= T*i;
End;
Câu 1: Đoạn lệnh trong chương trình thực hiện số vòng lặp là:
A. 4
B. 3
C. 5
D. 1
Câu 2: Ý nghĩa câu lệnh lặp trong đoạn chương trình trên là:
A. Tính tích đến khi nào T>=20 thì dừng vòng lặp
B. Tính tích đến khi nào T<>20 thì dừng vòng lặp
C. Tính tích đến khi nào T = 20 thì dừng vòng lặp
D. Tính tích đến khi nào T <= 20 thì dừng vòng lặp