K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

15 tháng 5 2019

Đáp án đúng : D

2 tháng 7 2017

Đáp án đúng : A

11 tháng 5 2018

Assign(f,’KQ.TXT’);

Rewrite(f);

Write(f,C,V);

Close(f);

11 tháng 12 2018

Var f1, f2: text;

  Tong, m, n, i: integer;

Begin

  assign(f1, ‘DULIEU.TXT’);

  reset(f1);

  assign(f2, ‘KETQUA’);

  rewrite(f2);

  Tong;= 0;

  read(f1, m, n);

  for i:= m to n do

  if i mod 2 = 0 then Tong:= Tong+i;

  write(f2, Tong);

  close(f1);

  close(f2);

End.

9 tháng 7 2018

Đáp án đúng : B

19 tháng 5 2017

Đáp án đúng : D

19 tháng 3 2018

Đáp án đúng : C

20 tháng 2 2019

Đáp án đúng : A

25 tháng 5 2018

Đáp án đúng : B

15 tháng 12 2017

Đáp án đúng : B