Cho đoạn chương trình sau:
s1 := ‘1234’; s2 := ‘abc’;
if length(s1) > length(s2) then writeln(s1) else writeln(s2);
Kết quả in ra màn hình là:
A. ‘1234’
B. ‘abc’
C. ‘1234abc’
D. ‘abc1234’
Cho đoạn chương trình sau:
s1 := ‘1234’; s2 := ‘abc’;
if length(s1) < length(s2) then writeln(s1) else writeln(s2);
Kết quả in ra màn hình là:
A. ‘1234’
B. ‘abc’
C. ‘1234abc’
D. ‘abc1234’
Cho đoạn chương trình sau:
s1 := ‘2345’; s2: ‘1234’;
if length(s1) > length(s2) then write(s1) else write(s2);
Kết quả in ra màn hình là:
A. ‘2345’
B. ‘1234’
C. ‘23451234’
D. ‘12342345’
Cho đoạn chương trình sau:
s1 := ‘1234’; s2: ‘abcd’;
if length(s1) > length(s2) then write(s1) else write(s2);
Kết quả in ra màn hình là:
A. ‘abcd’
B. ‘1234’
C. ‘abcd1234’
D. ‘1234abcd’
Cho đoạn chương trình sau:
s1 := ‘abc’; s2 := ‘1234’;
if length(s1) > length(s2) then writeln(s1) else writeln(s2);
Kết quả in ra màn hình là:
A. ‘1234’
B. ‘abc’
C. ‘1234abc’
D. ‘abc1234’
Cho đoạn chương trình sau:
s1 := ‘abcd’; s2: ‘1234’;
if length(s1) > length(s2) then write(s1) else write(s2);
Kết quả in ra màn hình là:
A. ‘abcd’
B. ‘1234’
C. ‘abcd1234’
D. ‘1234abcd’
Cho đoạn chương trình sau:
s1 := ‘abc’; s2 := ‘1234’;
if length(s1) < length(s2) then writeln(s1) else writeln(s2);
Kết quả in ra màn hình là:
A. ‘1234’
B. ‘abc’
C. ‘1234abc’
D. ‘abc1234’
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.
SyntaxError: expected ':' Dòng 4
Thêm dấu ":" sau điều kiện
Đố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;