Phát biểu nào sau đây là đúng với chương trình Vi_Du ?

 

Program Vi_Du ; Uses crt ; Var      f : text ;          ch : char ;     tenfile : string[30] ; Begin             Write(‘ Nhap ten file : ’) ;   readln(tenfile) ;             Assign(f, tenfile) ;    Reset(f) ; While not eof(f) do             Begin                         Read(f, ch) ;                         Write(ch) ;

 

Xét chương trình sau:

Var f: text;

begin

Assign (f, 'ABC.txt');

Rewrite(f);

write (f, 105+304-234);

close(f);

end.

Sau khi thực hiện chương trình, tệp ABC.txt có nội dung như thế nào?

Xét chương trình sau:

var a : real;

f :text;

BEGIN

assign (f, 'A txt'); rewrite(f);

a:=12.345;

writeln(f, a)

close(f);

END

Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?

Cho mảng A gồm 10 phần tử kiểu xâu. Đoạn lệnh nào ghi ra tệp văn bản tên là 'S.TXT theo dạng: gồm 10 dòng, mỗi dòng một xâu?

Trong Pascal, thực hiện chương trình VD_bt1_txt dưới đây sẽ ghi kết quả nào trong các kết quả cho dưới đây vào tệp văn bản BT1.TXT ?

Cho chương trình sau:

Var g: text;

begin

Aasign (g, 'ABC, DAT');

Rewrite(g)

write (g, '510 + 702 – 792');

close (g);

end

Sau khi thực hiện chương trình, tệp ABC.DAT có nội dung như thế nào?

Cho mảng A gồm n phần tử kiểu integer. Đoạn lệnh nào ghi ra tệp văn bản tên là 'BTXT theo dạng: dòng đầu tiên ghi số n, dòng thứ hai ghi n số là các phần tử của mảng A (các số này cách nhau đúng một dấu cách)?

Trong Pascal, cho trước tệp văn bản BT2.TXT chỉ có một dòng, chứa dòng chữ : CHAO MUNG BAN DEN VOI LAP TRINH ngay ở đầu dòng. Thực hiện chương trình VD_bt2_txt , trên màn hình sẽ hiện kết quả nào trong các kết quả cho dưới đây ?

Hãy viết câu lệnh tính khoảng cách d từ điểm M đến gốc tọa độ O với điểm M(x, y) trong mặt phẳng vuông góc

Để truy cập vào từng trường của bản ghi ta viết ra sao?

Chọn phát biểu đúng với chương trình Vi_Du dưới đây?

Program Vi_Du ;

Uses crt ;

Var      f : text ;          ch : char ; tenfile : string[30] ;

Begin

          Write(‘ Nhap ten file : ’) ;         readln(tenfile) ;

          Assign(f, ‘tenfile’) ;        Reset(f) ;

Whilenot eof(f) do

          Begin

                   Read(f, ch) ;

                   Write(ch) ;  

          End ;

Close(f) ;

End.

Hãy viết lệnh tính điện trở tương đương Rtd  cho sơ đồ mạch điện gồm 3 điện trở R1, R2, R3 mắc song song với nhau:

Cho chương trình sau:

Program Chuong_Trinh;

Var a, b, S : byte;

Procedure TD(Var x : byte ; y : byte);

    Var i : byte;

Begin

    i := 5;

writeln(x,‘  ’, y);

x := x + i ;

y := y + i ;

S := x + y ;

Writeln(x,‘  ’, y);

End;

Begin

    Write(‘nhập a và b : ’);

Readln(a, b);

TD(a,b);

Writeln(a,‘  ’, b, ‘  ’, S);

Readln;

End.

Trong chương trình trên có các tham số thực sự là:

Thực hiện chương trình VD_bt1_txt dưới đây sẽ ghi kết quả nào trong các kết quả cho dưới đây vào tệp văn bản BT1.TXT?

ProgramVD_bt1_txt;

Uses crt ;

Var f : text ;

Begin

          Clrscr;

          Assign(f, ‘BT1.TXT ’) ;

          Rewrite(f) ;

Write(f, 123 + 456) ;

Close(f) ;

End.

Xét chương trình sau:

var a,b longint;

f :text:

BEGIN

assign (f, 'A txt');

rewrite (f);

a:=123456;

b: =456;

writeln(f, a,b);

writeln(f, b, a);

close(f);

END

Sau khi thực hiện chương trình, tệp A.txt có nội dung như thế nào?

Trong mặt phẳng hệ tọa độ Descartes vuông góc, cho 2 điểm M(x1,y1) và N(x2,y2). Hãy viết câu lệnh tính khoảng cách d từ điểm M đến N:

Tệp songuyen.dat lưu n số nguyên của mảng 1 chiều, để in tất cả các số nguyên trong tệp ra màn hình thì sau khi thực hiện 2 thủ tục Assign(f,'songuyen.dat'); reset(f); ta thực hiện lệnh nào?

Cho một tệp văn bản có tên là 'ATXT’ có duy nhất một dòng chứa 5 số nguyên (các số này cách nhau ít nhất một dấu cách). Đoạn lênh nào đọc 5 số từ tệp vào mảng số nguyên A và ghi 5 số đó ra màn hình?

Cho trước tệp văn bản BT_TD gồm hai dòng như sau :

TRAN MINH HAI 9 8 7

NGUYEN QUANG VINH 10 5 9

Khi thực hiện chương trình Thi_Du  sẽ cho kết quả nào trong các kết quả sau đây ?

Thủ tục chuẩn Insert(S1,S2,vt) thực hiện điều gì?

Hàm chuẩn nào có tác dụng biến giá trị thực 6 thành 7?