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.

9 tháng 5 2023

For i:=1 to 10 do; writeln ('A');

-> thừa dấu ; ở sau do

-> sửa: For i:=1 to 10 do writeln ('A');

8 tháng 5 2023

a) sai giá trị

→for i:= 1 to 4 do writeln ('A');

b) thiếu dấu hai chấm

→for i:= 1 to 10 do writeln ('A');

c) thiếu dấu =, sai giá trị

for i:= 1 to 10 do writeln ('A');

Câu 13 :  Câu lệnh pascal nào sau đây là hợp lệ?

A. For i=1 to 10 do writeln(‘A’)

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

C. For i:=5 to 30 do; writeln(‘A’)

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

17 tháng 3 2022

D

17 tháng 3 2022
16 tháng 3 2021

Real => byte 

Chắc chắn là bạn phải thay kiểu dữ liệu Real sang Integer hoặc Byte rồi bởi vì Với vòng lặp for, biến đếm không bao giờ là số thực

A. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng?A. for i:= 4 to 1 do writeln(‘A’); B. for i= 1 to 10  writeln(‘A’);C. for i:= 1 to 10 do writeln(‘A’); D. for i  to 10 do writeln(‘A’);Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?A. 10 lần B. 5 lần C. 1 lần              D. Không...
Đọc tiếp

A. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất 

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

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

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

Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );

Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?

A. 10 lần B. 5 lần C. 1 lần              D. Không thực hiện.

Câu 3. Cho đoạn chương trình: J:= 0;

                                                            For i:= 1 to 5 do J:= j + i;

Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?

A. 12    B. 22 C. 15 D. 42.

Câu 4. Trong Pascal, câu lệnh nào sau đây là đúng?

A. S:=1;  B. i:=0; S:=1;

While S<10 do write(S);                 while s<10 do S:=S+i; i:=i+1;  

C. n:=2; while n<5 do write(‘A’); D. Cả A và B.

Câu 5. Khi thực hiện đoạn chương trình sau:  n:=1; T:=50;

        While n < 20 do  begin  n:= n+5; T:=T- n  end;

Hãy cho biết giá trị của biến T  bằng bao nhiêu?

A. 14 B. 15 C. 16 D. 17

Câu 6. 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 7. 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   chỉ số cuối.

C. Kiểu dữ liệu có thể là integer hoặc real.               D. Cả ba ý trên.

Câu 8. 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

1

Câu 1: B
Câu 2: A

Câu 3: C

Câu 4: B

Câu 5: D

Câu 6: B

Câu 7: A

Câu 8: C

Câu 1: Câu lệnh pascal nào sau đây là hợp lệ?a) For i:=100 to 1 do writeln(‘A’);b) For i:=1.5 to 10.5 do writeln(‘A’);c) For i= 1 to 10 do writeln(‘A’);d) For i:= 1 to 10 do writeln(‘A’);Câu 2: Lệnh lặp For, mỗi lần lặp giá trị của biến đếm thay đổi như thế nào?A. Tăng 1B. Tăng 2C. Tăng 3D. Tăng 4Câu 4: Vòng lặp for ..do là vòng lặp:A. Biết trước số lần lặpB. Chưa biết trước số lần lặpC. Biết trước số lần lặp nhưng...
Đọc tiếp

Câu 1: Câu lệnh pascal nào sau đây là hợp lệ?

a) For i:=100 to 1 do writeln(‘A’);

b) For i:=1.5 to 10.5 do writeln(‘A’);

c) For i= 1 to 10 do writeln(‘A’);

d) For i:= 1 to 10 do writeln(‘A’);

Câu 2: Lệnh lặp For, mỗi lần lặp giá trị của biến đếm thay đổi như thế nào?

A. Tăng 1

B. Tăng 2

C. Tăng 3

D. Tăng 4

Câu 4: Vòng lặp for ..do là vòng lặp:

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

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

C. Biết trước số lần lặp nhưng giới hạn là <=50

D. Biết trước số lần lặp nhưng giới hạn là >=50

Câu 5: Với ngôn ngữ lập trình Pascal câu lệnh lặp for i:=1 to 10 do x:=x+1;

thì biến đếm i phải được khai báo là kiểu dữ liệu: *

A. Integer

B. Real

C. String

D. Tất cả các kiểu trên đều được

Câu 6: 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) 101

d) 15

Câu 7: Để tính tổng S=1+3 + 5 + … + n; em chọn đoạn lệnh:

a) for i:=1 to n do

if ( i mod 2)=0 then S:=S + 1/i; c) for i:=1 to n do if ( i mod 2) < > 0 then S:=S + i;

b) for i:=1 to n do

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

Else S:= S + i; d) for i:=1 to n do if ( i mod 2)=0 then S:=S + i;

Câu 8: Để đếm có bao nhiêu số lẻ nhỏ hơn hay bằng n ; em chọn đoạn lệnh:

a) for i:=1 to n do

if ( i mod 2)< >0 then S:=S + 1; c) for i:=1 to n do if ( i mod 2) =0 then S:=S + 1;

b) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i ; d) for i:=1 to n do if ( i mod 2)=0 then S:=S + i;

III. Bài tập thực hành: Viết chương trình nhập vào 1 số nguyên n. Viết ra 20 các số chẳn tiếp theo lớn hơn số n.

GIÚP VỚI !!!

2
2 tháng 3 2021

1.C

2.A

4.A

5.A

6.D

7.C

8.A

III.

Program HOC24;

var  n,d: integer;

begin

write('Nhap N: '); readln(n);

if n mod 2=1 then

begin

begin

n:=n+1;

write(n,' ');

end;

d:=1;

while d<20 do 

begin

n:=n+2;

write(n,' ');

d:=d+1;

end;

end else

begin

d:=1;

while d<=20 do 

begin

n:=n+2;

write(n,' ');

d:=d+1;

end;

end;

readln

end.

Câu 1: Chọn C

Câu 2: Chọn A

30 tháng 5 2022

C, F?

31 tháng 5 2022

C