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.

Câu 24. Trong pascal, cho đoạn chương trình:Assign(f1,‟Input.dat‟); Reset(f1);While not eoln(f1) do BeginRead(f1,x);Write(x, ‘ '); End;Close(f1); A. Xuất dữ liệu trong tệp Input.dat ra màn hình;   B. Ghi dữ liệu vào tệp Input.dat; C. Gắn tên tệp Input.Dat cho biến tệp f1;              D. Mở tệp Input.dat để đọc; Câu 25. Đoạn chương trình sau thực hiện: Assign(f1,‟Input.dat‟); Assign(f2,‟Output.dat‟); Reset(f1); Rewrite(f2);While not EOF(f1)...
Đọc tiếp

Câu 24Trong pascal, cho đoạn chương trình:Assign(f1,‟Input.dat‟); Reset(f1);

While not eoln(f1) do 

Begin

Read(f1,x);Write(x, ‘ '); 

End;

Close(f1);

 

A. Xuất dữ liệu trong tệp Input.dat ra màn hình;   B. Ghi dữ liệu vào tệp Input.dat;

 

C. Gắn tên tệp Input.Dat cho biến tệp f1;              D. Mở tệp Input.dat để đọc;

 

Câu 25. Đoạn chương trình sau thực hiện: Assign(f1,‟Input.dat‟); Assign(f2,‟Output.dat‟); Reset(f1); Rewrite(f2);

While not EOF(f1) do

Begin

Read(f1,x); Write(f2,x,’ ’);

End;

Close(f1); 

Close(f2);

 

Đọc dữ liệu từ tệp Input.dat và ghi dữ liệu ra tệp Output.dat trên cùng một dòng.

B.Đọc dữ liệu từ tệp Input.dat và ghi dữ liệu ra tệp Output.dat trên nhiều dòng.

Đọc dữ liệu từ tệp Output.dat và ghi dữ liệu ra tệp Input.dat trên nhiều dòng.

Đọc dữ liệu từ tệp Output.dat và ghi dữ liệu ra tệp Intput.dat trên cùng một dòng.

 

Câu 26. Cho tệp B13.TXT chỉ có một dòng „abcdefgh‟ và chương trình sau: Var f:text; S1:string[3]; S2:string;

Begin

Assign(f,’B13.TXT’); 

Reset(f); 

Read(f,S2,S1);

Readln

End.

 

Sau khi chạy chương trình trên thì S1,S2 có kết quả là

 

a. S1=’absdefgh’; S2=’ ’

b. S1=’ ’; S2=’abcdefgh’

 c. S1=’abcde’;S2=’fgh’

d. Cả a,b,c sai

1

Câu 24: A

Câu 25: A

 

18 tháng 1 2022

C1: Một chương trình Pascal gồm 2 phần: phần khai báo và phần thân chương trinh

C2: Từ khóa trong Pascal: program, input, output, var, real, begin, readline, writeline và end

C3:  -Tên không bắt đầu bằng chữ số

        - Tên không có khoảng cách

        - Tên không được trùng với từ khóa

C4: ví dụ tính diện tích hình vuông:

Program HINH_VUONG;
   uses crt;
   Var canh: real;
Begin
    clrscr;
    Write('Nhap do dai canh:');readln(canh);
    Writeln('Chu vi hinh vuong la:',4*canh:10:2);
    Writeln('Dien tich hinh vuong la:',canh*canh:10:2);
    readln
end.

C5:              

     B1: Tải Pascal trên 1 link nhất định       

     B2: Mở thư mục chưa file tải về click đúp (hoặc click phải chuột chọn Install) để tiến hành cài đặt  

    B3:  Chọn Next để sang bước kế tiếp:

    B4: Click vào Browse để lựa chọn ổ đĩa cài đặt. Hoặc không bạn có thể để mặc định và tiếp tục chọn Next.

    B5: Click vào Install để bắt đầu cài đặt.

    B6: Chờ đợi quá trình cài đặt diễn ra trong một vài phút.

    B7: Click vào Finish để hoàn tất quá trình cài đặt.

Câu 1: Cho đoạn chương trình Pascal sau đây:tong:= 0;While tong <= 10 do tong:=tong+1;Sau khi đoạn chương trình trên được thực hiện, giá trị của tổng bằng bao nhiêu:A. 9                          B. 10                             C. 11                             D. 12Câu 2: Sau khi đoạn chương trình sau được thực hiện, giá trị của biến S bằng bao nhiêu:S:= 0;for i:= 1 to 5 do S:= S + i;A. 10                                  B. 12                     ...
Đọc tiếp

Câu 1: Cho đoạn chương trình Pascal sau đây:

tong:= 0;

While tong <= 10 do

tong:=tong+1;

Sau khi đoạn chương trình trên được thực hiện, giá trị của tổng bằng bao nhiêu:

A. 9                          B. 10                             C. 11                             D. 12

Câu 2: Sau khi đoạn chương trình sau được thực hiện, giá trị của biến S bằng bao nhiêu:

S:= 0;

for i:= 1 to 5 do S:= S + i;

A. 10                                  B. 12                              C. 20                              D. 15

Câu 3: Cho đoạn chương trình sau:

i:=1; tong:=0;

While i <= 5 do

Begin

tong:= tong + i;

i:= i + 1;

End;

Sau đoạn chương trình trên em hãy cho biết biến “tong” có giá trị bằng bao nhiêu?

A.1                           B.5                                 C.10                               D.15

Câu 4: Trong Pascal, câu lệnh nào sau đây được viết đúng?

A. for i := 10 to 1 do writeln(‘A’);

B. for i := 1.5 to 5.5 do writeln(‘A’);

C. for i := 1 to 100 do writeln(‘A’);

D. for i := 1 to 10; do writeln(‘A’);

Câu 5: Trong câu lệnh lặp for n:= 1 to 10 do begin ... end;

Câu lệnh ghép được thực hiện bao nhiêu lần?

A. 10 lần;                 B. 5 lần;     C. Không lần nào;                   D. 1 lần.

Câu 6: Khi giải thích các thành phần trong câu lệnh lặp, phát biểu nào sau đây đúng?

A. For, to, do là các từ khóa, biến đếm là biến kiểu số nguyên hoặc số thực.

B. Giá trị đầu và giá trị cuối là các giá trị nguyên hoặc giá trị thực.

C. Câu lệnh lặp sẽ thực hiện câu lệnh nhiều lần, mỗi lần là một vòng lặp. Số lần lặp là biết trước và bằng giá trị cuối – giá trị đầu + 1.

D. Cả ba ý trên.

Câu 7: Khai báo biến mảng: A : array[1..7] of real;. Sử dụng câu lệnh

For i:= 1 to 5 do readln(A[i]); để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?

A. 4;               B. 5;                               C. 6;                                        D. 7.

Câu 8: Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

A. Chỉ số đầu và chỉ số cuối là 2 số nguyên;

B. Chỉ số đầu nhỏ hơn chỉ số cuối;

C. Kiểu dữ liệu có thể là integer hoặc real;

D. Cả ba ý trên;

Câu 9: Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6. Khi thực hiện câu lệnh sau:

tb:= 0;

For i:= 1 to 5 do tb := tb + A[i];

Giá trị của biến tb là bao nhiêu?

A. 20;                                          B. 18;                   C. 21;                             D. 22;

Câu 10: Lệnh lặp nào sau đây là đúng?

A.   For <biến đếm>= <giá trị đầu>  to  <giá trị cuối> do <câu lệnh>;

B.   For <biến đếm>:= <giá trị đầu>  to <giá trị cuối > do <câu lệnh>;

C.   For <biến đếm>:= <giá trị cuối>  to <giá trị đầu> do <câu lệnh>;

D.   For <biến đếm>: <giá trị đầu>   to <câu lệnh> do <giá trị cuối>;

Câu 11: Lệnh  lặp while ..do  số vòng lặp là:

A. Biết trước số lần lặp                              B. Chưa biết trước số lần lặp

            C. Không thực hiện vòng lặp nào                           D. Lặp vô hạn lần

Câu 12: Câu lệnh lặp while…do có dạng đúng là:

A. While <điều kiện> do <câu lệnh>;            B. While <điều kiện> <câu lệnh> do;

C. While <câu lệnh> do <điều kiện>;     D. While <điều kiện>, do  <câu lệnh>;

Câu 13: Cho S và i là biến nguyên. Khi chạy đoạn chương trình:

    s:=0;       for i:=1 to 5 do s:= s+i;

    writeln(s);

    Kết quả in lên màn hình là của s là:

     A.11                     B. 55                              C. 15                    D.105

Câu 14: Chương trình pascal sau sẽ in ra màn hình nội dung gì?

Var i: integer;

Begin 

For i:=1 to 10 do writeln(‘Day la lan lap thu’ ,i);

                                   Readln; 

                                   End.

A. 1 câu “Day la lan lap thu i ”        

B. 1 câu “Day la lan lap thu’, i ”

C. 10 câu “Day la lan lap thu’ , i ”   

D. 10 câu "Day la lan lap  thu   i ”  theo thứ tự   của  i là   từ  1à10

Câu 15 Cho S và i biến kiểu nguyên. Khi chạy đoạn chương trình:

    S:= 0;  i:= 1;

    while i <5  do      begin       S:= S + i;   i:= i + 1;      end;

          Giá trị sau cùng của S là:

          A. 16                    B. 9                      C. 6                      D.0 ai lm đc xứng đáng 10 ny hí hí

 

0

Câu 1: B

Câu 2: A

29 tháng 5 2017

Đáp án A

Kết thúc một câu lệnh.

2 tháng 5 2022

D

3 tháng 3 2021

Bạn viết lại câu hỏi đc khihi

Câu 25     Đoạn lệnh sau đâyx:=1;While x<=10 dox:=x+1;Khi nào thì kết thúc vòng lặp While .. do trên?A. Khi x<10                   B. Khi x = 10                 C. Khi x <=10                D. Khi x>10Câu 26:     Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì?          For i:=1 to 5 do write (i:3);        A. 1   2   3   4   5                                 B.  5   4   3   2   1        C. Đưa ra i:3                                       D. Không...
Đọc tiếp

Câu 25     Đoạn lệnh sau đây

x:=1;

While x<=10 do

x:=x+1;

Khi nào thì kết thúc vòng lặp While .. do trên?

A. Khi x<10                   B. Khi x = 10                 C. Khi x <=10                D. Khi x>10

Câu 26:     Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì?

          For i:=1 to 5 do write (i:3);

        A. 1   2   3   4   5                                 B.  5   4   3   2   1

        C. Đưa ra i:3                                       D. Không đưa ra kết quả gì

Câu 27:    Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:

A. If a=5 then a:=d+1; else a:=d+2;                 B. If a=5 then a:=d+1 else a:=d;

           C. If a:=5 then a=d+1; else a=d+2;                 D. If a<=5 then a:=d+1 else; a:=d+2;

Câu 28:      Cho đoạn chương trình Pascal sau:

For  i := 1 to 5 do

Begin

y := i;

End;

Sau khi thực hiện đoạn chương trình trên, giá trị của y là bao nhiêu?

A. 3            B.  4            C.  5                     D.   6

Câu 29:      Để tính tổng  S=2 + 4 + 6  … + n; em chọn đoạn lệnh:

A.   For i:=1 to n do

          if ( i mod 2)=0 then S:=S + i;

 

B.   For i:=1 to n do

          S:= S + i;

C.   c. For i:=1 to n do

          if ( i mod 2)=1 then S:=S + i;

D.   for i:=1 to n do

          if ( i mod 2)<>0 then S:=S + i;

 

Câu 30:      Cho đoạn chương trình Pascal sau:

          x:=3;

For i:=1 to 7 do x:= x+1;

Sau khi thực hiện câu lệnh For, giá trị của x là bao nhiêu?

A. 9                           B. 7                      C. 10                    D. 3

Câu 31:      Tìm giá trị của S trong đọan chương trình dưới đây:  

S := 0;                                                                                           

For  i := 1 to 5 do S := S + i;

A. S = 0           B. S = 1      C. S = 5      D. S = 15

 

2
27 tháng 3 2022

D

27 tháng 3 2022

25. D

26. A

27. B

28. C

29. A

30. C

31. D