Trong ngôn ngữ Pascal hãy viết biểu thức logic kiểm tra m thoả mãn điều kiện trên.. Câu 5 5 điểm a./ Viết chương trình nhập vào từ bàn fím đường kính của một đường tròn và chiếu lên màn
Trang 1Câu 1) (1 điểm):Trong Pascal có biểu thức: (sqr(x) + sqr(y))/(a + sin(x)) hãy
chuyển biểu thức này sang dạng toán học
Câu 2) (2 điêm): Chưong trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ
cho các biến trong khai báo sau:
Var i, j , k , dem : integer ;
A, B, S : real ;
Câu 3) (1 điểm): m là một số nguyên khi chia m cho 100 dư nhỏ hơm 10 và
phần nguyên lớn hơn 0 Trong ngôn ngữ Pascal hãy viết biểu thức logic kiểm tra m thoả mãn điều kiện trên
Câu 4) (1 điểm): Kết thúc vòng lặp sau T nhận gia trị bao nhiêu khi nhập vào từ bàn fím m = 11, n = 29
Var T: logint
m, n, i : integer;
BEGIN T:= 0;
For i:=m to n do
if (i mod 4 = 0) and (i mod 6 = 0) then T:=T + i;
END.
Câu 5) (5 điểm)
a./ Viết chương trình nhập vào từ bàn fím đường kính của một đường tròn và chiếu lên màn hình diện tích và chi vi của đường tròn đó
b./ Viết chương trình nhập vào từ bàn fím 2 số nguyên m, n kiểm tra xem nếu
m < n thì tính tông các số từ m đến n còn m > n thì hiện lên màn hình câu “mời bạn nhập lại”
Trang 2Đề kiểm tra học kì 1 Môn Tin học 11
(thời gian 45 phút)
Câu 1) (1 điểm):Trong Pascal có biểu thức: sqr(x) + sqr(y)/(a + sin(x)) hãy
chuyển biểu thức này sang dạng toán học
Câu 2) (2 điêm): Chưong trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ cho các biến trong khai báo sau:
Var i, j , dem : integer ;
A, B, S ,T : real ;
Câu 3) (1 điểm): m là một số nguyên khi chia m cho 50 dư nhỏ hơm 10 và
phần nguyên lớn hơn 0 Trong ngôn ngữ Pascal hãy viết biểu thức logic kiểm tra m thoả mãn điều kiện trên
Câu 4) Kết quả khi thực hiện vòng lặp sau S nhận giá trị là bao nhiêu
i:= 1 ; S:= 1
While i < = 5 do Begin
S:= S + i;
i: = i + 1;
End
Giá trị của S là:
Câu 5) (5 điểm)
a./ Viết chương trình nhập vào từ bàn fím hai số nguyên m, n là độ dài đường cao và cạnh đáy của một tam giác và chiếu lên màn hình diện tích của tam giác đó
b./ Viết chương trình nhập vào từ bàn fím 2 số nguyên m, n kiểm tra xem nếu
m < n thì tính tổng các số từ m đến n còn m > n thì hiện lên màn hình giá trị
m - n
Thông báo kết quả lên màn hình
-Bài làm:
Họ và tên
Lớp
Trang 3Câu 1) (1 điểm):Trong Pascal có biểu thức: (sqr(x) + sqr(y))/a + sin(x) hãy
chuyển biểu thức này sang dạng toán học
Câu 2) (2 điêm): Chưong trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ
cho các biên trong khai báo sau:
Var i, j , k , dem : Byte;
A, B, S : real ;
Câu 3) (1 điểm): m là một số nguyên dương và là số chia hết cho 3 Trong
ngôn ngữ Pascal hãy viết biểu thức logic kiểm tra m thoả mãn điều kiện trên
Câu 4) (1 điểm): Với vòng lặp sau khi nhập n = 5, S sẽ có giá trị là bao nhiêu :
Var n : integer;
BEGIN
READLN(n) ; S: =3;
For i := 1 TO n DO
S := S + i ; END.
Câu 5) (5 điểm)
a./ Viết chương trình nhập vào từ bàn fím hai số thực m, n là độ dài đường cao
và cạnh của một hình bình hành và chiếu lên màn hình diện tích của hình bình hành đó
b./ Viết chương trình nhập vào từ bàn fím 2 số nguyên m, n kiểm tra xem nếu
m , n là các số chẵn thì tính tổng các số nằm trong khoảng (m, n) còn m lẽ hoặc
n lẽ thì hiện lên màn hình giá trị thương của m và n
Trang 4Đề kiểm tra học kì 1 Môn Tin học 11
(thời gian 45 phút)
Câu 1) (1 điểm):Trong Pascal có biểu thức: sqrt(sqr(x) + sqr(y))/(a + sin(x))
hãy chuyển biểu thức này sang dạng toán học
Câu 2) (2 điêm): Chưong trình dịch Pascal sẽ cấp phát bao nhiêu byte bộ nhớ
cho các biên trong khai báo sau:
Var i, j , k , dem : word ;
A, B, S : Integer;
X, y, tong : extended ;
Câu 3) (1 điểm): m là một số nguyên dương hoặc m là số lẽ Trong ngôn ngữ
Pascal hãy viết biểu thức logic kiểm tra m thoả mãn điều kiện trên
Câu 4) (1 điểm): Cho x = 18 , y = 22, Lệnh write(i) dưới đây chiếu lên màn hình giá trị bao nhiêu?
Var i, x, y: integer BEGIN
Readln(x, y);
If x > y then
begin
i := x
else i:= y - x;
Write(i) end;
END
Câu 5) (5 điểm)
a./ Viết chương trình nhập vào từ bàn fím hai số thực m, n là độ dài đường cao
và cạnh đáy của một tam giác và chiếu lên màn hình diện tích của tam giác đó b./ Viết chương trình nhập vào từ bàn fím 2 số nguyên m, n (m < n) kiểm tra xem nếu m , n là các số lẽ thì tính tổng các số từ m đến n còn m hoặc n là số chẵn thì hiện lên màn hình giá trị biểu thức m + 2nS
Thông báo kết quả lên màn hình
-Bài làm:
Họ và tên
Lớp