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.

a) sai chỗ x:=100 và thiếu ;

Sửa lại: if x=100 then x:=x+1;

b) Dấu gán sai(thiếu dấu hai chấm)

Sửa lại: if a<b then max:=b;

c) Sai chỗ trước else(bởi nguyên tắc là trước else không bao giờ có;)

Sửa lại: if a>b then max:=a else max:=b;

d) Dấu gán sai(thiếu dấu hai chấm)

Sửa lại: if a>b then max:=a else max:=b;

3 tháng 12 2019

a,sai chấm phẩy ở cuối câu

if x:=100 then x:=x+1;

b, thiếu hai chấm ở phần gán max = b

if a<b then max:=b;

c, thừa dấu hai chấm ở trước else

if a>b then max:=a else max:=b;

d, thiếu dấu hai chấm ở phần gán max=a

if a>b then max:=a else mã:=b

Câu lệnh thứ 3 hợp lệ

\(I\), Lý thuyết: 1) Điều kiện B mod 2 <> 0 nếu đúng có ý nghĩa gì? a) B là số dương b) B là số âm c) B là số chẵn d) B là số lẻ 2) Cấu trúc rẽ nhánh dạng đầy đủ: a) If điều kiện then câu lệnh 1; else câu lệnh 2; b) If điều kiện then câu lệnh 1else câu lệnh 2; c) If điều kiện then câu lệnh; d) If điều kiện then câu lệnh else câu lệnh; 3) Tìm số chẵn/ lẻ bằng câu lệnh nào sao đây : a) If X mod 2= 0 then...
Đọc tiếp

\(I\), Lý thuyết:

1) Điều kiện B mod 2 <> 0 nếu đúng có ý nghĩa gì?

a) B là số dương b) B là số âm c) B là số chẵn d) B là số lẻ

2) Cấu trúc rẽ nhánh dạng đầy đủ:

a) If điều kiện then câu lệnh 1; else câu lệnh 2;

b) If điều kiện then câu lệnh 1else câu lệnh 2;

c) If điều kiện then câu lệnh;

d) If điều kiện then câu lệnh else câu lệnh;

3) Tìm số chẵn/ lẻ bằng câu lệnh nào sao đây :

a) If X mod 2= 0 then Writeln(' X là số lẻ ');

b) If X mod 2= 0 then Writeln(' X là số chẵn ');

c) If X mod 2= 0 then Writeln(' X là số lẻ ') else Writeln(' X là số chẵn ');

d) If X mod 2= 0 then Writeln(' X là số chẵn') else Writeln(' X là số lẻ ');

4) Tìm số lớn nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:

a) max:=x; If y < max then max:= y else max:= z;

b) max:=x; If y > max then max:= y else max:= z;

c) max:=x; If y > max then max:= y; if z > max then max:= z;

d) max:=x; If y < max then max:= y; if z < max then max:= z;

5) Pascal sử dụng câu lệnh lặp nào sau đây là cấu trúc rẽ nhánh dạng thiếu

a) For ... to ... do; b) If ...then; c) If ...then...else d) While ...do;

6) Chọn câu lệnh Pascal hợp lệ trong các câu sau:

a) If a = 6 then x:= 100; b) If a > b then max:= a; else max:= b;

c) If a > b then max = a; d) If x := a + b then x: =x + 1;

3

1: D

2: B

3: D

4: C

5: B

6: A

11 tháng 2 2020

1) Điều kiện B mod 2 <> 0 nếu đúng có ý nghĩa gì?

a) B là số dương b) B là số âm c) B là số chẵn d) B là số lẻ

2) Cấu trúc rẽ nhánh dạng đầy đủ:

a) If điều kiện then câu lệnh 1; else câu lệnh 2;

b) If điều kiện then câu lệnh 1else câu lệnh 2;

c) If điều kiện then câu lệnh;

d) If điều kiện then câu lệnh else câu lệnh;

3) Tìm số chẵn/ lẻ bằng câu lệnh nào sao đây :

a) If X mod 2= 0 then Writeln(' X là số lẻ ');

b) If X mod 2= 0 then Writeln(' X là số chẵn ');

c) If X mod 2= 0 then Writeln(' X là số lẻ ') else Writeln(' X là số chẵn ');

d) If X mod 2= 0 then Writeln(' X là số chẵn') else Writeln(' X là số lẻ ');

4) Tìm số lớn nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:

a) max:=x; If y < max then max:= y else max:= z;

b) max:=x; If y > max then max:= y else max:= z;

c) max:=x; If y > max then max:= y; if z > max then max:= z;

d) max:=x; If y < max then max:= y; if z < max then max:= z;

5) Pascal sử dụng câu lệnh lặp nào sau đây là cấu trúc rẽ nhánh dạng thiếu

a) For ... to ... do; b) If ...then; c) If ...then...else d) While ...do;

6) Chọn câu lệnh Pascal hợp lệ trong các câu sau:

a) If a = 6 then x:= 100; b) If a > b then max:= a; else max:= b;

c) If a > b then max = a; d) If x := a + b then x: =x + 1;

a) if a>b then max:=a; else max:=b;b) var X: Array[5..10] Of Real; c) X:=10; while X:=10 do X := X+5; d) for  i:=1.5 to 10 do m:=m + 1;e) if a>b then max:=a else max:=b;f) var X: Array[5.5..10] Of Real; g) X:=10; while X>10 do X := X+5; h) for  i:=1.5 to 10 do m:=m + 1;III. Hãy viết các câu lệnh, khai báo theo yêu cầu sau: A. Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực.B. Phần tử thứ  5 của mảng A được gán giá trị là 8.C. Khai báo mảng dayso gồm...
Đọc tiếp

a) if a>b then max:=a; else max:=b;

b) var X: Array[5..10] Of Real;

c) X:=10; while X:=10 do X := X+5;

d) for  i:=1.5 to 10 do m:=m + 1;

e) if a>b then max:=a else max:=b;

f) var X: Array[5.5..10] Of Real;

g) X:=10; while X>10 do X := X+5;

h) for  i:=1.5 to 10 do m:=m + 1;

III. Hãy viết các câu lệnh, khai báo theo yêu cầu sau:

A. Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực.

B. Phần tử thứ  5 của mảng A được gán giá trị là 8.

C. Khai báo mảng dayso gồm 50 phần tử thuộc kiểu dữ liệu số nguyên.

D. Nhập giá trị cho phần tử thứ 2 trong mảng diem.        

IV. Bài tập

 Viết chương trình thực hiện các yêu cầu sau:

a.    Nhập điểm văn và điểm toán của n học sinh trong một lớp (n nhập từ bàn phím)

b.    Tính điểm trung bình của mỗi học sinh (kết quả lấy 1 chữ số thập phân)

help với mai ktr ;-;

 

1

III:
A: var a:array[1..50]of real;

B: a[5]:=8;

C: var a:array[1..50]of integer;

D: readln(dem[2]);

1. Các câu lệnh Pascal sau đây được viết đúng hay sai? A. if x:=5 the a=b; B. if x > 4; then a:=b; C. if x > 4 then a:=b; m:=n; D. if x > 4 then a:=b; else m:=n; 2. Để tìm giá trị lớn nhất của hai số a,b thì ta viết: A. Max:=a; If b>Max then Max:=b; B. If (a>b) then Max:=a; If ( b>a) then Max:=b; C. Max:=b; If a>Max then Max:=a; D. Cả 3 câu đều đúng 3. If.. Then...Else là: A. Vòng lặp xác định B. Vòng lặp không xác định C. Câu lệnh điều...
Đọc tiếp

1. Các câu lệnh Pascal sau đây được viết đúng hay sai?

A. if x:=5 the a=b;

B. if x > 4; then a:=b;

C. if x > 4 then a:=b; m:=n;

D. if x > 4 then a:=b; else m:=n;

2. Để tìm giá trị lớn nhất của hai số a,b thì ta viết:

A. Max:=a; If b>Max then Max:=b;

B. If (a>b) then Max:=a; If ( b>a) then Max:=b;

C. Max:=b; If a>Max then Max:=a;

D. Cả 3 câu đều đúng

3. If.. Then...Else là:

A. Vòng lặp xác định

B. Vòng lặp không xác định

C. Câu lệnh điều kiện

D. Một khai báo

4. If a>8 then b:=3 else b:=5; Khi a nhận giá trị là 0 thì b nhận giá trị nào?

A. 0

B. 5

C. 8

D. 3

5. Phần dư trong phép chia của hai số nguyên 16 và 5 là:

A. 16 div 5 = 1

B. 16 mod 5=1

C. 16 div 5=3

D. 16 mod 5=3

6. A được khai báo là biến có kiểu dữ liệu số nguyên, X là biến dữ liệu kiểu xấu. Phép gán hợp lệ:

A. A:=4.5;

B. X:='1234';

C. X:=57;

D. A:='LamDong';

1

Câu 1:

A sai

B sai

C đúng

D sai

Câu 2: D

Câu 3: C

Câu 4: B

Câu 5: B

Câu 6: B

22 tháng 4 2019

Lời giải :

a) sai vì trước else không được chứa dấu ;

b) đúng

c) sai vì kết thúc x:=x+5 phải có dấu ;

d) sai vì trong vòng lặp for không có kiểu dữ liệu số thực

15 tháng 12 2021

c

LÝ THUYẾT: 1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây: A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30 2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'') C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi 3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết: A. Max:=b;If a> Max then Max:=a; B. If (a>b) then...
Đọc tiếp

LÝ THUYẾT:

1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây:

A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30

2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng

A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'')

C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi

3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết:

A. Max:=b;If a> Max then Max:=a; B. If (a>b) then Max:=a;If (b>a) then Max:=b;

C. Max:=a;If b>Max then Max:=b; D. Cả 3 câu đều đúng

4) Lệnh nào thể hiện A là số chẵn:

A. If A mod 2 <> 1 then write (' A là số lẻ ');

B. If A mod 2 <> 0 then write (' A là số chẵn ');

C. If A mod 2 = 0 then write (' A là số chẵn ');

D. If A mod 2 = 1 then write (' A là số chẵn ');

5) Chương trình sau cho biết kết quả là gì?

Var a, b: real; x integer; Begin readln(a, b); If a > b then x:=a else x:=b; Write(x); End.

A. Đảo giá trị của 2 biến a, b cho nhau

B. Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu

C. Xuất ra màn hình số lớn trong 2 số a, b đã nhập

D. Xuất ra màn hình số nhỏ trong 2 số a, b đã nhập

6) Điều kiện nào hợp lệ trong các điều kiện sau khi nói về ngày trong tháng 8:

A. (NGAY > 0) AND (NGAY <= 31) B. (NGAY > 0) AND (NGAY <= 30)

C. NGAY <= 31 D. NGAY > 0

7) Để thể hiện điều kiện D lớn hơn hay bằng 8 và E là Gioi câu nào sau đây đúng:

A. D >= 8 AND E= Gioi B. (D >= 8) AND (E= Gioi)

C. (D >= 8) AND (E= "Gioi") D. (D >= 8) AND (E= 'Gioi')

8) Xác định học sinh thi đậu hay rớt bằng câu lệnh nào sau đây:

A. If ĐTB >= 0 then Writeln('Thi đậu');

B. If ĐTB >= 0 then Writeln('Thi rớt');

C. If ĐTB >= 5 then Writeln('Thi đậu') else Writeln('Thi rớt');

D. If X mod 2=0 then Writeln('Thi rớt') else Writeln('Thi đậu');

9) Tìm số bé nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:

A. min:=x; If y>min then min:=y else min:=z;

B. min:=x; If y>min then min:=y; if z>min then min:=z;

C. min:=x; If y<min then min:=y else min:=z;

D. min:=x; If y<min then min:=y; if z<min then min:=z;

10) Để thể hiện B lớn hơn 10 câu nào sau đây đúng:

A. B >= '10' B. B>= '10' C. B > 10 D. B >= 10

1

Câu 1: B

Câu 2: A

Câu 3: D

Câu 4: C

Câu 5: B

Câu 6: A

Câu 7: D

Câu 8: C

Câu 9: D

Câu 10: C