Câu hỏi:
Viết chương trình:
Nhập vào một xâu kí tự.
Đếm và in ra màn hình số kí tự là số có trong xâu.
Var a: string;
I,dem: integer;
Begin
Readln(a);
Dem:=0;
For i:=1 to length(a) do
If (‘0’<=a[i]) and (a[i]<=’9’) then dem:=dem+1;
Writeln(dem);
Readln
End.
A.
Câu 1: Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)-1]));
Kết quả in ra màn hình là:
A. ‘X’
B. ‘U’
C. ‘A’
D. ‘N’
30/11/2021 0 Lượt xem
30/11/2021 0 Lượt xem
Câu 3: Chọn phát biểu đúng trong các phát biểu dưới đây khi nói về lợi ích của việc sử dụng chương trình con:
A. Để chương trình gọn hơn
B. Tránh được việc phải viết lặp đi lặp lại cùng một dãy lệnh nào đó
C. Hỗ trợ việc viết chương trình có cấu trúc như cấu trúc lặp, rẽ nhánh
D. Không có lợi ích
30/11/2021 0 Lượt xem
Câu 4: Để gắn tên tệp cho tên biến tệp ta sử dụng câu lệnh:
A. <biến tệp> := <tên tệp>;
B. <tên tệp> := <biến tệp>;
C. assign(<biến tệp> , <tên tệp>);
D. assign(<tên tệp> , <biến tệp>);
30/11/2021 0 Lượt xem
Câu 5: Chương trình con thực hiện các thao tác nhất định nhưng không trả về giá trị nào qua tên của nó là:
A. Hàm
B. Thủ tục
C. Cả A và B đều đúng
D. Đáp án khác
30/11/2021 0 Lượt xem
Câu 6: Cho đoạn chương trình sau:
s:= ‘edcba’;
For i:= length(s) downto 1 do write(s[i]);
Kết quả in ra màn hình là:
A. ‘abcd’
B. ‘dcba’
C. ‘abcde’
D. ‘edcba’
30/11/2021 0 Lượt xem

Câu hỏi trong đề: Đề thi giữa kì 2 Tin học 11 có đáp án (Đề 1)
- 9 Lượt thi
- 45 Phút
- 22 Câu hỏi
- Học sinh
Cùng danh mục Đề thi Tin học 11
- 1.4K
- 8
- 10
-
95 người đang thi
- 623
- 10
- 22
-
76 người đang thi
- 573
- 8
- 23
-
39 người đang thi
- 599
- 9
- 10
-
26 người đang thi
Chia sẻ:
Đăng Nhập để viết bình luận