để gắn tệp kq.txt cho biến tệp f1 ta sử dụng câu lệnh

A. Assign(f2, ‘KQ.TXT’);

Đáp án chủ yếu xác

Cho đoạn lịch trình sau:

s1 := ‘acb’; s2: ‘abcd’;

if s1 > s2 then write(s1) else write(s2);

Kết ngược in đi ra screen là:

A. ‘abcd’

B. ‘acb’

C. ‘abcdacb’

D. ‘acbabcd’

Cho s = ‘ABCDEF’, hàm copy (s, 3, 3) cho tới độ quý hiếm là:

A. ‘ABC’

B. ‘BCD’

C. ‘CDE’

D. ‘DEF’

Cho đoạn lịch trình sau:

s1 := ‘abcd’; s2: ‘1234’;

if length(s1) > length(s2) then write(s1) else write(s2);

Kết ngược in đi ra screen là:

A. ‘abcd’

B. ‘1234’

C. ‘abcd1234’

D. ‘1234abcd’

Xem thêm: viết bài văn tả cảnh sinh hoạt

Cho chương trình sau:

Program C_trinh_con;

Var d: char;

 X1: string;

Procedure Xoa (a: char ; var Xt:string);

 Var j: byte;

 Begin

  j := pos (a, Xt);

  while j < > 0 do

  begin

   delete(Xt, j, 1);

    j := pos(a, Xt);

  end;

 End;

Begin

 X1:=’SEPTEMBER’;

 d := ‘E’;

 Xoa (d, X1);

End.

a/ Hãy chạy tay tạo ra thành quả theo đuổi bảng kiểu mẫu bên dưới đây

b/ Hãy chỉ ra: biến chuyển toàn viên, biến chuyển toàn cục, thông số kiểu dáng, tham ô số thực sự, thông số biến chuyển,tham ô số giá trị vô lịch trình bên trên.

Cho s = ‘Tran Hung Dao’, hàm length(s) cho tới độ quý hiếm bằng:

A. 11

B. 12

C. 13

D. 14

Câu mệnh lệnh há biến chuyển tệp f1 nhằm gọi tài liệu với dạng:

A. reset(f1);

B. rewrite(f1);

C. read(f1);

Xem thêm: cách tính hiệu suất phản ứng

D. write(f1);