chuanho

chuanho

Thành viên
Học sinh mới from Adam Khoo
Bài viết
144
Lượt Thích
0
Điểm
0
Tham gia ngày
Được nhìn thấy lần cuối

Tường Hoạt động mới Bài viết Giới thiệu

  • D
    assign (f1,'tepB');
    reset (f1);
    while not (eof (f1)) do {Chú ý not( ) }
    begin
    readln(f1,n);
    writeln(f2,n)
    end;
    Close(f1);
    Close(f2);
    End.

    Dài quá phải tách 2
    D
    Cậu hiểu sai yêu cầu đề, bây h đọc lại đề mới thấy người ta bảo nối 2 tệp với nhau mà:
    Những dòng đầu ghi nội dung tệp A, những dòng sau ghi nộp dung tệp B :D
    Var f1,f2 : text ;
    n:integer;
    Begin
    assign ( f1,'tepA');
    reset(f1);
    Assign(f2,'tepC');
    Rewrite(f2);
    while not (eof (f1)) do {Chú ý not( ) }
    begin
    readln(f1,n);
    writeln(f2,n)
    end;
    Close(f1);
    D
    Var f1,f2:text;
    s:string;
    i:integer;
    Begin
    Assign(f1,'TepA');
    Reset(f1);
    Assign(f2,'tepB');
    Rewrite(f2);

    While not(eof(f1)) do
    Begin
    Readln(f1,s);

    {Cat dau va duoi}
    While s[1]=#32 do delete(s,1,1);{#32 la ky tu trong}
    While s[length(s)]=#32 do delete(s,lenght(s),1);

    {Xu li 2 dau cach dung lien nhau}
    For i:=1 to n-1 do
    Begin
    If (s=#32) and (s[i+1]=#32) then delete(s,i,1);
    End;

    {Sau khi xu li xong thi ghi vao tep B}
    Writeln(f2,s);
    End;

    Close(f1);
    Close(f2);

    End.
    D
    Cậu đâu, nếu cậu làm bài kia như thế thì dữ liệu trong tệp B sẽ bị mất hết :) lấy đâu để đọc :(

    Phải đọc hết nội dung của tệp A và B để lưu rồi biến nhớ rồi sau đó mới xuất ra :)
    D
    HIc nói chung thao tác với tệp thì

    Phần khai bao biến

    Var....
    ...
    f:text;

    Trước khi đọc tệp thì :
    Assign(f,'Tên tệp');
    Reset(f);

    Đọc xong thì : Close(f);


    Trước khi ghi tệp thì
    Assign(f,'Tên tệp');
    Rewrite(f);

    Đọc xong thì Close(f);
    D
    Cậu học nhanh thế :(

    Bài tập về tệp thì chỉ có đọc và xuất tệp :(. Cậu đưa bài tập nói cho dễ :). Tệp tưởng khó nhưng tớ thấy đơn giản nhất :x
    giotbuonkhongten
    Đốt cháy hoàn toàn 0,336g hh ch cơ A thu đc 0,792g CO2,0,234g H2O.Mặt khác khi đun nóng 0,594g hchc đó với bột CuO dư trong khí CO2,hh khí và hơi thu được cho lội qua dd Ca(OH)2dư
    và dd H2SO4 đậm đặc,thấy thoát ra 37,42 cm^3 một chất khí(ở 27^o,750 mmHg)
    Xác định CTPT A bik A chứa 1 N
    nN2 = 0,03742/(0,082.(273+27)) =
    chia số mol ra bình thường thôi
    D
    Được rồi :p

    cậu giả sử lim = a, rồi thế u_n+1 =a và u_n = a thì cậu có được 2 số, nhưng mà cậu để ý dãy toàn số âm nên lấy giá trị âm ;)
    giotbuonkhongten
    Đốt cháy hoàn toàn 0,336g hh ch cơ A thu đc 0,792g CO2,0,234g H2O.Mặt khác khi đun nóng 0,594g hchc đó với bột CuO dư trong khí CO2,hh khí và hơi thu được cho lội qua dd Ca(OH)2dư
    và dd H2SO4 đậm đặc,thấy thoát ra 37,42 cm^3 một chất khí(ở 27^o,750 mmHg)
    Xác định CTPT A bik A chứa 1 N
    đúng roài, khí thoát ra là N2
    Tìm số mol N2 ---> m N2
    Tìm số mol H, số mol C --> m H, mC + mN2 so vs 0,336 g để xem có O hay ko
    từ đó lập tỉ lệ

    quan trọng là con phải rút ra số mol N2 cho đúng vì 0,336 # 0,594
    D
    nói lâu, đọc nhanh, cậu lật phần Cauchy-Schwart ra mà coi :)

    Mà cậu lo học cái khác đi, lo gì phần BDT nó nhiều vô kể :(
    D
    Đây là phương pháp hệ số bất định không phải do tớ nghĩ ra ;)) :D
    Trong căn toàn x và y nên tớ giả sử như vậy thôi ;)

    Mà sao lại gọi tớ "đậu phụng" :-w ai bày cho cậu vậy :-w
  • Đang tải…
  • Đang tải…
  • Đang tải…
Top Bottom