9

11

10

12

12

23

bc12

c123

'Q'

'Biển Đảo Quê Hương'

'quê'

'Biên'

Xuất kết quả so sánh ký tự đầu tiên của xếp hạng A và ký tự cuối cùng của xếp hạng B.

Xuất kết quả so sánh của xếp hạng A và xếp hạng B.

Xuất kết quả so sánh chiều dài của xâu A và chiều dài của xâu B.

Xuất kết quả so sánh ký tự đầu tiên của xếp hạng B và ký tự cuối cùng của xếp hạng A.

10

9

5000

'5000 ki tu'

s1 = '123'; s2 = 'a123bc'

s1 = '123'; s2 = '12abc'

s1 = '1abc23'; s2 = 'abc'

s1 = 'ab123; s2 = 'abc'

Xâu có độ dài lớn nhất là 255;

Xâu có độ dài lớn nhất là 0;

Cần phải khai báo kích thước của chuỗi sau đó;

Sai câu lệnh vì thiếu độ dài tối đa của xâu;

2

3

4

5

Var <tên biến> : <tên kiểu> ;

Var <tên biến> : String[độ dài lớn nhất của xâu] ;

Var <tên biến> = <tên kiểu>;

Var <tên biến> = String[độ dài lớn nhất của xâu];

i:=pos(s,'hoa');

i:=pos('hoa','hoa');

i:=pos('hoa',s);

s1:='hoa' ; i:=pos(s1,'hoa');

'abc'='ABC'

'ccb'<'abcdef'

'cba'<'abc'

'abcdh'>'abcdef'

Var a: string;

Var : a string;

var a, b: string[20];

var s = string;

Array

String

Type

Const

9

11

10

12

12

23

bc12

c123

'Q'

'Bien Dao Que Huong'

'Que'

‘Bien’

delete(a, length(a), 1);

delete(a, 1, 255);

delete(a, 255, 1);

delete(a, 1, length(a));

For i:=length(S) downto 1 do write(S[i]);

For i:=length(S) downto 1 do write(S);

For i:=1 to length(S) do write(S[i]);

For i:=1 to length(S) div 2 do write(S[i]);

9

‘5’

500

‘500’

s1 = ‘123’; s2 = ‘a123bc’

s1 = ‘123’; s2 = ‘12abc’

s1 = ‘1abc23’; s2 = ‘abc’

s1 = ‘ab123; s2 = ‘abc’

2

3

4

5

i:=pos(s,’hoa’);

i:=pos(‘hoa’,’hoa’);

i:=pos(‘hoa’,s);

s1:=’hoa’ ; i:=pos(s1,’hoa’);

Xóa đi các dấu cách trong xâu;

Đếm số ký tự có trong xâu;

Đếm số dấu cách có trong xâu;

Xóa đi các ký tự số;

Câu lệnh sai vì thiếu độ dài tối đa của xâu          

Xâu có độ dài lớn nhất là 0

Xâu có độ dài lớn nhất là 255

Cần phải khai báo kích thước của xâu sau đó

In xâu ra màn hình;

In từng kí tự xâu ra màn hình;

In từng kí tự ra màn hình theo thứ tự ngược, trừ kí tự đầu tiên;

In từng kí tự ra màn hình theo thứ tự ngược;

P := P + S

P := S[i] ;

P := P + S[i] ;

P := '' + S[i] ;

S := '' ;

S := 0 ;

S := ' ' ;l

S := '0' ;

'trac nghiem online'

"bai12"

Truong THPT NVC

{Lop 11A1 rat doan ket}

'1234546'

P := copy(S, length(s) - 2 , 3);

P := copy(S, 1, 3);

P := copy(S, length(s) -3 , 3);

P := copy(S, 1, 3);

For i := 1 to length(s) do s := upcase(s[i]);

For i := 1 to length(s) do s := upcase(s);

For i := 1 to length(s) do upcase(s[i]);

For i := 1 to length(s) do s[i] := upcase(s[i]);

a := s_p ;

a := s + p ;

a := 's' + 'p' ;

a := length(s) + length(p) ;

assign(<biến tệp>,<tên tệp>);

<tên tệp> := <tên biến tệp>;

<biến tệp> := <tên tệp>;

assign(<tên tệp>,<biến tệp>);

Sẽ bị mất hết khi tắt máy

Sẽ bị mất hết khi tắt điện đột ngột.

Không bị mất khi tắt máy hoặc mất điện

Lưu ở bộ nhớ RAM

A. Các kiểu dữ liệu đều được lưu trữ ở bộ nhớ trong (RAM).

A. Dữ liệu kiểu tệp được lưu trữ ở bộ nhớ ngoài (đĩa mềm, đĩa cứng, CD, thiết bị nhớ Flash).

Các dữ liệu trong máy tính đều bị mất đi khi tắt nguồn điện

Dữ liệu kiểu tệp được lưu trữ ở bộ nhớ trong

var f1; f2 : text

Var f1 f2 : text

Var f1: f2 : text

Var f1, f2 : text

(3) -> (1) -> (4) -> (5);

(1) -> (3) -> (4) -> (5);

(2) -> (6) -> (4) -> (3);

(3) -> (2) -> (6) -> (5);

Read(f, x, y, z);

Read(f, ‘x’, ‘y’, ‘z’);

Read(x, y, z);

Read(‘x’, ‘y’, ‘z’);

(3) ->(1) -> (4) -> (5);

(2) -> (6) -> (4) -> (3);

(1) -> (3) -> (4) -> (5);

(3) -> (2) -> (6) -> (5);

Write(f, a,b,c)

Write(a, ‘ ’, b, ‘ ’, c);

Write(f, a, ‘ ’, bc)

Write(f, a, ‘ ’, b,‘ ’, c);

Tệp sẽ được tạo ra với nội dung trống.

Chương trình báo lỗi vì không tìm thấy tệp.

Nội dung cũ trong tệp sẽ bị xóa để chuẩn bị ghi dữ liệu mới.

Dữ liệu mới sẽ được ghi vào phía sau dữ liệu cũ.

Phải được khai báo trước.

Không được lớn hơn 255.

Không bị giới hạn mà chỉ phụ thuộc vào dung lượng đĩa.

Không được lớn hơn 128.

    Assign(f,’A.OUT’); rewrite(f);

For i:=1 to 5 do write(f,a[i],’ ‘);

Assign(f,’A.OUT’); rewrite(f);

For i:=1 to 5 do write(a[i],’ ‘);

     Assign(f,’A.OUT’); reset(f);

For i:=1 to 5 do read(f,a[i]);

Assign(f,’A.OUT’); reset(f);

For i:=1 to 5 do write(f,a[i],’ ‘);

Thủ tục mở tệp để ghi dữ liệu.

Thủ tục ghi dữ liệu vào tệp.

Thủ tục dọc dữ liệu từ tệp.

Thủ tục đóng tệp.

Được lưu trữ trên ROM

Chỉ được lưu trữ trên đĩa cứng.

Được lưu trữ trên RAM.        

Được lưu trữ trên bộ nhớ ngoài.

Đầu dòng;

Đầu tệp

Cuối dòng

Không phải cuối dòng.

Write(<tên tệp>, <danh sách bến>);

Write(<tên biến tệp,<danh sách biến>);

Read(<tên biến tệp>,<danh sách biến>);

Read(<tên tệp>,<danh sách biến>);

Cho phép tham chiếu đến dữ liệu cần truy cần bằng cách xác định trực tiếp vị trí của dữ liệu đó.

Là tệp mà dữ liệu được ghi dưới dạng các ký tự theo bảng mã ASCII

Cho phép truy cập đến một dữ liệu nào đó trong tệp chỉ bằng cách bắt đầu từ đầu tệp và đi qua lần lượt tất cả các dữ liệu trước nó.

Là tệp mà các phần tử của nó được tổ chức theo một cấu trúc nhất định.

Sẽ bị mất hết khi tắt điện đột ngột.

Sẽ bị mất hết khi tắt máy.

Không bao giờ bị mất.

Không bị mất khi tắt máy hoặc mất điện.

Var f1,f2 : text;          

Var f1 f2 : text;

Var f1, f2 : text,

Var f1: f2 :text;

Tệp sẽ được tạo ra với nội dung trống.

Chương trình báo lỗi vì không tìm thấy tệp.

Nội dung cũ trong tệp sẽ bị xóa để chuẩn bị ghi dữ liệu mới.

Dữ liệu mới sẽ được ghi vào phía sau dữ liệu cũ.

Đầu dòng

Cuối tệp

Cuối dòng

Đầu tệp

Thủ tục mở tệp để ghi dữ liệu.

Thủ tục ghi dữ liệu vào tệp.

Thủ tục đọc dữ liệu từ tệp.

Thủ tục đóng tệp.

Đọc giá trị n phần tử vào mảng a từ tệp 'DL.INP'

Ghi giá trị n phần tử của mảng a ra tệp 'DL.INP'

Đọc giá trị của n phần tử trong mảng a từ bàn phím

Ghi giá trị của n phần tử trong mảng a từ bàn phím

rewrite(<biến tệp>);

và

read/readln(<biến tệp>,<d/s biến vào>);

rewrite(<biến tệp>);

và

write/writeln(<biến tệp>,<d/s biến vào>);

reset(<biến tệp>);

và

write/writeln(<biến tệp>,<d/s biến vào>);

reset(<biến tệp>);

và

read/readln(<biến tệp>,<d/s biến vào>);

d := sqrt(sqr(x1 – x2) + sqr(y1 – y2));

d := sqr(sqrt(x1 – x2) + sqrt(y1 – y2)); 

d := sqrt(sqr(x1 + x2) – sqr(y1 + y2));

d := sqr(sqrt(x1 + x2) – sqrt(y1 + y2));

Phần khai báo, phần thân, phần viết lệnh

Phần đầu, phần thân, phần viết lệnh

Phần đầu, phần khai báo, phần thân

Phần khai báo, phần thân

Var A: array[1..20] of integer;

Var A= array[1..20] of integer;

Var A:= array[1..20] of integer;

Var A: array[1,20] of integer;

Khai báo biến Dayso gồm max số nguyên.

Khai báo biến Dayso gồm 100 số thực.

Khai báo biến mảng A gồm max số nguyên.

Khai báo biến A gồm tối đa 100 số thực.

A[1] := 6/2 ;

A[2] := -10 ;

A(3) := 6 ;

A := 10 ;

Write ('S=', S);

Readln (S);

S := S/N;

$$S=\frac{S}{N}$$  

Từ -99 đến 99

Từ -99 đến 100

Từ -100 đến 100

Từ -100 đến 99

Real

Char

Integer

String

Tên kiểu mảng, tên biến mảng

Chỉ số phần tử, tên kiểu mảng

Tên biến mảng, chỉ số phần tử

Giá trị của phần tử, biến mảng

A[1]=0, A[2]=1, A[3]=2, A[4]=3

A[1]=1, A[2]=1, A[3]=1, A[4]=1

A[1]=1, A[2]=2, A[3]=3, A[4]=4

A[1]=2, A[2]=3, A[3]=4, A[4]=5

In ra màn hình các số nguyên âm

In ra màn hình các số nguyên âm

Kiểm tra phần tử thứ i là dương hay âm

Không làm gì cả

TYPE A : ARRAY [1..50] OF Integer;

Var A = ARRAY [1..50] OF Integer;

Var A : ARRAY[1..50] OF Integer;

TYPE A = ARRAY [1..50] OF Integer;

For i:= n downto 1 do writeln(‘ ’, A[i]);

For i:= n downto 1 do write(A[i], ‘ ’);

For i:= 1 to n do write(‘ ’, A[i]);

For i:= 1 to n do writeln(‘ ’, A[i]);

Tạo giá trị ngẫu nhiên cho mảng A gồm n phần tử (các giá trị nằm trong khoảng 0..50).

Tạo giá trị ngẫu nhiên cho mảng A gồm n phần tử

Tạo giá trị ngẫu nhiên cho mảng A gồm 50 phần tử

Tạo giá trị ngẫu nhiên cho mảng A gồm 49 phần tử

In giá trị của phần tử nguyên dương cuối cùng trong A ra màn hình

In chỉ số của phần tử nguyên dương đầu tiên trong A ra màn hình

In giá trị của phần tử nguyên dương đầu tiên trong A ra màn hình

In chỉ số của phần tử nguyên dương cuối cùng trong A ra màn hình

Nmax là một biến nguyên đã được khai báo trước đó.

Nmax phải là kiểu số nguyên hoặc kiểu ký tự hoặc kiểu logic.

Nmax là một hằng số nguyên đã được khai báo trước đó.

Mọi trường hợp.

Write(A[10]);

Write(A(10));

Readln(A[10]);

Write([10]);

For i:=1 to 10 do Begin Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]); End;

For i:=1 to 10 do Write(‘ Nhập A[‘, i, ‘]:’); Readln(A[i]);

For i:=1 to 10 do Readln(‘ Nhập A[‘, i, ‘]:’);

Write(‘ Nhập A:’); Readln(A);

Kiểu số thực, kiểu logic

Kiểu miền con, kiểu kí tự

Kiểu số nguyên, kiểu số thực

Kiểu đếm được

Thông qua tên biến và chỉ số của mảng.

Thông qua tên biến mảng.

Thông qua chỉ số của mảng.

Làm việc trực tiếp với mảng.

Có kiểu dữ liệu khác nhau.

Có thể có kiểu dữ liệu giống hoặc khác nhau.

Có kiểu dữ liệu giống nhau.

Tất cả các phương án đều sai.

Kiểu kí tự

Kiểu số thực

Kiểu logic

Cả ba kiểu trên

a, b, c, delta_khong

a, b, c, delta, x1, x2

a, b, c, delta

a, b, c, delta, x

a, b, c, delta_khong

a, b, c, delta, x1, x2

a, b, delta

a, b, c, delta

dleta, delta_khong

delta_duong, delta_khong, delta_am

delta_duong, delta_khong, vd

delta_duong, delta, delta_am

Procedure

Proceduce

Program

Function

Biến dùng trong toàn bộ chương trình;

Biến dùng trong nội bộ thủ tục;

Biến dùng trong lời gọi thủ tục;

Không có tham số hình thức

Có tham số hình thức

Biến cục bộ

Biến toàn cục

Tham số hình thức

Tham số thực sự

Biến cục bộ

Biến toàn cục

Tham số hình thức

Tham số thực sự

Biến cục bộ

Biến toàn cục

Tham số hình thức

Tham số thực sự

Thủ tục và hàm

Thủ tục, hàm và chương trình chính

Thủ tục và thân chương trình chính

Function  Tinh (x,y : real) : real;

Function  Tinh (x , y : integer): integer;

Function  (x , y :integer) : integer;

Function  Tinh (x , y: real) : integer;

x và y

x,y và z

a, z và b

Z

x và y

z

a và b

Z, a, b

x và y

z

a và b

Z, a, b

Procedure   Nhap (var  x,y: integer);

Procedure  Xuat (var   x,y: real);

Procedure     (x,y : byte);

Procedure  (x: real; var   y : integer);

Phần đầu có thể có hoặc không có cũng được.

Phần đầu và phần thân nhất thiết phải có, phần khai báo có thể có hoặc không.

Phần khai báo có thể có hoặc không có tùy thuộc vào từng chương trình cụ thể.

Phần đầu nhất thiết phải có để khai báo tên chương trình con.

SQRT

PROCEDURE

FOR

FUNCTION

1

2

3

4