Cho đoạn chương trình sau:
s := ‘1001010’;
write(pos(‘012’, s));
Kết quả in ra màn hình là:
A. 0
B. ‘0’
C. 3
D. ‘3’
Cho đoạn chương trình sau:
s := ‘abcde’;
write(pos(‘cba’, s));
Kết quả in ra màn hình là:
A. 0
B. ‘0’
C. 3
D. ‘3’
Cho đoạn chương trình sau:
s := ‘1001010’;
write(pos(‘011’, s));
Kết quả in ra màn hình là:
A. 0
B. ‘0’
C. 3
D. ‘3’
Cho đoạn chương trình sau:
s := ‘abcde’;
write(pos(‘aba’, s));
Kết quả in ra màn hình là:
A. 0
B. ‘0’
C. 3
D. ‘3’
Viết chương trình đọc dữ liệu từ tệp fi với tệp fi chứa dữ liệu là 1 xâu dữ liệu. Ghi kết quả vào tệp fo các kết quả sau khi xử lý xâu.a. Xâu vừa đọc được từ tệp fi, xâu chuyển thành chữ in hoab. Xâu s1 được tạo gồm n kí tự liên tiếp của xâu s bắt đầu tại vt.c. Xâu sau khi xóa a kí tự của xâu s bắt đầu tại vị trí vt
Đọc tiếp
Viết chương trình đọc dữ liệu từ tệp fi với tệp fi chứa dữ liệu là 1 xâu dữ liệu. Ghi kết quả vào tệp fo các kết quả sau khi xử lý xâu.
a. Xâu vừa đọc được từ tệp fi, xâu chuyển thành chữ in hoa
b. Xâu s1 được tạo gồm n kí tự liên tiếp của xâu s bắt đầu tại vt.
c. Xâu sau khi xóa a kí tự của xâu s bắt đầu tại vị trí vt
Viết hàm để tạo 1 xâu , là xâu được viết theo thứ tự ngược lại của xâu S
function s1(s:string):string;
var d,i:integer;
s2:string;
begin
d:=length(s);
s2:=#32;
for i:=d downto 1 do
s2:=s2+s[i];
s1:=s2;
end;
Đúng 1
Bình luận (1)
Chọn đáp án đúng: Vietnams football team received a rock-star welcome in Hanoi yesterday,..1... losing to Uzbekistan in the 2018 U23 Asian Championship Final. Thousands of supporters flocked to the streets from Noi Bai Airport to Hanois city center to greet the team bus,...2...the Vietnamese PMs reception for the team by five hours. A home-coming celebration was also held at My Dinh National Stadium, where all 40000 seats were filled with thousands more waiting outside to see the players. Thei...
Đọc tiếp
Chọn đáp án đúng:
Vietnam's football team received a "rock-star" welcome in Hanoi yesterday,..1... losing to Uzbekistan in the 2018 U23 Asian Championship Final. Thousands of supporters flocked to the streets from Noi Bai Airport to Hanoi's city center to greet the team bus,...2...the Vietnamese PM's reception for the team by five hours. A home-coming celebration was also held at My Dinh National Stadium, where all 40000 seats were filled with thousands more waiting outside to see the players. Their..3.. at the U23 Asian Cup made the players "overnight celebrities in the football-crazy nation" AFP wrote. Various Korean outlets, including Korea Times, Sportal Korea and Hani, have also expressed amazement at the way football fans have celebrated their national team's achievement, and at the same time, hailed the team's performance at the tournament..4.."heroic" and "like a fairy tale"
According to Sportal Korea, the team made an "impressive achievement" at the Asian tournament. "The red flags were being waved everywhere on the streets, and the cheering went on until late" Hani wrote. The Korea Times also added that Vietnam's success at the Asuan Cup had brought Vietnamese football and Korean football "closer". More importantly, it is the success..5..unites the country on so many levels
1. A. although B. because C. because of D. despite
2. A. delaying B. delays C. delyed D. to delay
3. A. succession B. success C. successes D. succeeding
4. A. like B. similar C. as D. same
5. A. which B. who C. that D. when
Chọn đáp án đúng:
Vietnam's football team received a "rock-star" welcome in Hanoi yesterday,..1... losing to Uzbekistan in the 2018 U23 Asian Championship Final. Thousands of supporters flocked to the streets from Noi Bai Airport to Hanoi's city center to greet the team bus,...2...the Vietnamese PM's reception for the team by five hours. A home-coming celebration was also held at My Dinh National Stadium, where all 40000 seats were filled with thousands more waiting outside to see the players. Their..3.. at the U23 Asian Cup made the players "overnight celebrities in the football-crazy nation" AFP wrote. Various Korean outlets, including Korea Times, Sportal Korea and Hani, have also expressed amazement at the way football fans have celebrated their national team's achievement, and at the same time, hailed the team's performance at the tournament..4.."heroic" and "like a fairy tale"
According to Sportal Korea, the team made an "impressive achievement" at the Asian tournament. "The red flags were being waved everywhere on the streets, and the cheering went on until late" Hani wrote. The Korea Times also added that Vietnam's success at the Asuan Cup had brought Vietnamese football and Korean football "closer". More importantly, it is the success..5..unites the country on so many levels
1. A. although B. because C. because of D. despite
2. A. delaying B. delays C. delyed D. to delay
3. A. succession B. success C. successes D. succeeding
4. A. like B. similar C. as D. same
5. A. which B. who C. that D. when
Đúng 2
Bình luận (0)
NC
20 tháng 4 2022 lúc 12:43
Nhập xâu S vào từ bàn phím rồi tính tổng các số trong xâu S và đưa kết quả ra màn hình.
Lưu ý : "Số" khác với "chữ số".
Ví dụ : Nếu nhập xâu 'awjir1ui125j62kj61ji52' thì tổng sẽ là
T = 1+125 + 62 + 61 + 52 = 301
b1: nhập 1 dãy a từ bàn phím . tính tổng các giá trj của dãy a.
b2 : cho 2 xâu s1 và s2, viết đoạn chương trình chèn xâu s1 vào giữa s2, tại vị trí len(s2)2. in kết quả ra màn hình
b3: cho xâu s, viết đoạn lệnh trích ra xâu con của s bao gồm 3 ks tự đầu tiên của s
b4 ; viết chương trình kiểm tra xâu s có chứa chữ số không. thông báo s có chứa chữ số hoặc s kh chứa chữ số nào
help me, ty 3
Đọc tiếp
b1: nhập 1 dãy a từ bàn phím . tính tổng các giá trj của dãy a.
b2 : cho 2 xâu s1 và s2, viết đoạn chương trình chèn xâu s1 vào giữa s2, tại vị trí len(s2)\\2. in kết quả ra màn hình
b3: cho xâu s, viết đoạn lệnh trích ra xâu con của s bao gồm 3 ks tự đầu tiên của s
b4 ; viết chương trình kiểm tra xâu s có chứa chữ số không. thông báo " s có chứa chữ số" hoặc " s kh chứa chữ số nào "
help me, ty 3>
Cho tệp ' DL.INP ' chứa 1 xâu kí tự S, hãy đếm số chữ số có trong xâu S và ghi kết quả vào tệp ' KQ.OUT '
Program HOC24;
const fi='DL.INP'
fo='DL.OUT'
var s: string;
d,i: byte;
f: text;
procedure ip;
begin
assign(f,fi);
reset(f);
read(f,s);
close(f);
end;
procedure out;
begin
assign(f,fo);
rewrite(f);
d:=0;
for i:=1 to length(s) do if s[i] in ['0'..'9'] then inc(d);
write(f,d);
close(f);
end;
begin
ip;
out;
end.
Đúng 2
Bình luận (0)
const fi='dl.inp'
fo='kq.out'
var f1,f2:text;
s:string;
d,i,dem:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,s);
d:=length(s);
dem:=0;
for i:=1 to d do
if s[i] in ['0'..'9'] then inc(dem);
writeln(dem);
readln;
end.
Đúng 2
Bình luận (0)