để 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’);

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

Đá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 trái khoáy in rời khỏi 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 trái khoáy in rời khỏi screen là:

A. ‘abcd’

B. ‘1234’

C. ‘abcd1234’

D. ‘1234abcd’

Xem thêm: my cup of tea

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 sản phẩm theo gót bảng kiểu bên dưới đây

b/ Hãy chỉ ra: biến hóa toàn viên, biến hóa toàn thể, thông số mẫu mã, tham lam số thực sự, thông số biến hóa,tham lam số giá trị nhập 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 banh biến hóa tệp f1 nhằm phát âm tài liệu đem dạng:

A. reset(f1);

B. rewrite(f1);

C. read(f1);

Xem thêm: câu lệnh while

D. write(f1);