Giupppp
----- Nội dung dịch tự động từ ảnh -----
22:47 D O0 •

a 125

c/ 62

b/ 122

d/ 52

dNh giá trị cho biến.

26. Cho b:=120 + 22 div 10.Giả trị của b là:

dùng với công thức trên:

a Var C, F: real:

b/ Var C, F: real;

c/ Var C, F: integer;

d/ Var C, F: string :

34. Cho chương trình sau đây:

Var a,b: integer;

Begin

25B

a 125

c/ 62

b/ 122

d/ 52

27. Cho c:=60+32 mod 10.Giá trị của c là:

b/ 92

d/ 52

28. Cho d:-120 + 32 div 10 .Giá trị của d là:

b/ 122

C:-(F+32)/1.8 ;

C:(F-32)/1.8 ;

C:-(F-32)/1.8;

C:-(F-32)/1.8;

al 125

c/ 62

al 123

c/ 62

29. Khai báo một biển sau:

Var h: integer:

Câu lệnh gán giá trị cho biển h nào sau đây không

hợp lệ:

a/ h:-15 ;

c/ h:=5:

30. Có một căn nhà hình chữ nhật có chiều rộng là a,

chiều dài gấp 3 lần lần chiều rộng. Người ta cần lát

gach cho căn nhà. Em hãy giúp gia chủ tỉnh diện

tich S căn nhà để mua gạch. Phần xác định bài toán

d/ 15

a.

b:=a mod 10;

a:a div 10;

a:=a+b;

writeln('Gia tri cua a la: ',a):

End.

b/ h:-11 div 2:

d/ h:-10*2/5;

trị của a sau khi chạy chương trình trên là:

b/ 12

d/ 25

Giá

al 7

c/ 17

35. Cho chương trình tính chu vi hình vuông có cạnh

a:

Var a, cv : integer;

Begin

write('Nhap canh a: ); readln(a):

là:

al Input : chiều rộng a

b/ Input : chiều rộng a

c/ Input : chiều dài a

d/ Input : chiều dài a

31. Tính chỉ số khối cơ thể BMI (Body Mass Index)

Output :Chu vi P

Output :Diện tich S

Output :Chu vi P

Output :Diện tích S

writeln('Chu vi hinh vuong la: ', ev):

End.

Lệnh đúng và hợp lệ để điền vào chổ

al ev:a*4;

c/ dt:-a*a;

36. Cho chương trình sau đây:

Var x.y : integer;

Begin

readln(x);

readinty):

là:

-. Câu lệnh pascal khai

H

theo công thức: BMI =

b/ adt*dt;

d/ ev:-a*4

báo các biến và lệnh gán nào đúng với công thức

trên:

al Var bmi, w, h : real;

b/ Var bmi, w, h: real;

e/ Var bmi, w, h : integer;

d/ Var bmi, w, h: string:

BMI :=W(H*H):

BMI :-W/H*H;

BMI :=W/(H*H):

BMI :-W/(H*H):

X:=X-y;

y:y-x;

writeln(x, y):

readln;

32. Công thức đổi từ nhiệt độ Celsius (C) sang nhiệt

độ Fahrenheit ("F) là F=1,8.C+32:

Câu lệnh pascal khai báo các biến và lệnh gán nào

đúng với công thức trên:

al Var C, F: real

b/ Var C, F: real;

e/ Var C, F: integer,

d/ Var C, F: string:

33. Công thức đổi từ nhiệt độ Fahrenheit (F) sang

End.

Khi chạy chương trình trên và nhập giá trị cho x và

y lần lượt là 15 và 10. Kết quả của x, y lần lượt là:

al 15 10

c/ 5

F:-1,8°C+32;

F:=1.8°C+32;

F:=1,8*C+32;

F:-1.8°C+32 ;

b/ 10

15

d/ -5

20

F- 32.

nhiệt độ Celsius ("C) là C =

1,8

Câu lệnh pascal khai báo các biểến và lệnh gán nào

Bài toán (các bài toán thực hiện phần xác định bài toán (Input. Output) và viết chương trình:

Ôn các công thức tỉnh diện tích, chu vi hình vuông, chữ nhật, hình tròn, đổi nhiệt độ từ độ C → F, F→C

Bài 1: Bác nông dân có miếng đất hình chữ nhật có chiều dài là a, chiều rộng là b (cạnh đo bằng đơn vị mét). Bác nông

dân cần rào bằng lưới mắt cáo xung quanh miếng đất. Em hãy viết chương trìinh giúp bác nông dân tính được số mét lưới

cần để rào và diện tích miếng đất?

Xác định bài toán

Input: .

Output: .

Viết chương trìinh bằng NNLT Pascal

Uses crt;

Var

Begin

Clrscr;

Wrizet 'Nhap .: '): Readln(..):