Bai tap chuong 2 chat luong tot nen xem

Chia sẻ bởi Nguyễn Thanh Vũ | Ngày 26/04/2019 | 32

Chia sẻ tài liệu: bai tap chuong 2 chat luong tot nen xem thuộc Tin học 11

Nội dung tài liệu:

BÀI TẬP CHƯƠNG II
CHƯƠNG TRÌNH ĐƠN GIẢN (Lớp 11C6)

Bài 1: Viết cấu trúc chung của một chương trình trong PASCAL.

Program ;
Uses ;
Const = ;
Var : ;
(*có thể còn có các khai báo khác*)
Begin

End.

Bài 2: Chuyển đổi các biểu thức toán học sang biểu thức trong PASCAL tương ứng:

1. (X-y)  + 


2. (3x2 - 2x – 1)


3. 


4. 


5. 


6. 


7. ++


8. 


9. 


10. 


11. 


12. 


 +Cosx


 


 2t2 + 


 


 


 


 


 


 


 


 


 


Bài 3: Chương trình dịch của Pascal sẽ cấp phát bao nhiêu bộ nhớ cho các biến khai báo sau:

1/ Var M,N,I,J: Integer;
P,A,B,C: Real;
X: Extended;
U: Word;


2/ Var x1,x2,x3: Real;
e,f,g,h: Byte;
c,d: Longint;
m,n: Char;


3/ Var a,b,c,d: Word;
I,j: real;
Y,z: integer;
Dem: byte;


Bài 4: Viết các biểu thức sau dưới dạng toán học tương ứng;

1/ 2*sqr(abs(x+y))/(sqrt(x)*cos(y))


2/ Sqr(sin(x)/(y+0.5))


3/ (A+sin(x))/sqrt(a*a+x*x+1) ;


4/ Abs(1/3*sqrt(15+x)-100);


5/ Abs(1/3*sqrt(15+x)-100);


6/ Abs(x-y)/(x*x+sqr(y)+2) ;


7/ Cos(3*PI*x/2)+sin(3*PI*x/2) ;


Bài 5 : Hãy chỉ ra lỗi trong khai báo và đoạn chương trình sau : 

1/ Var
K,M,i,L : Word ; (dòng 1)
C,c1 : Char ; (dòng 2)
I, i1,j : word ; (dòng 3)
PI = 3.1416; (dòng 4)



2/ Var
A,B,C: Char; (dòng 1)
X,y,z: integer; (dòng 2)
X1,x2,x: real; (dòng 3)
Uses Crt; (dòng 4)


3/ If a ≥ 0 then a := 1 ; (dòng 1)
Else a := 2 (dòng 2)


4/ Var
A,b,c = real; (dòng 1)
M,n,k,i: integer; (dòng 2)
H,a,o,t: byte (dòng 3)
Pi : 1.14; (dòng 4)


5/ Program bai tap; (dòng 1)
H,t,o: integer; (dòng 2)
I,m,n,h: real (dòng 3)
Const TH: Truong THPT Ca Mau; (dòng4)
Pi = 1.1416; (dòng 5)




Bài 6: Xác định kết quả của một số chương trình đơn giản:

1/ Program bai_mo_dau;
Begin
Writeln(’Truong THPT Ca Mau’);
Writeln(’Chao cac em hoc sinh khoi 11’);
Writeln(’Moi cac em lam quen voi Turbo Pascal’);
Readln
End.


2/ Var a,b,t : real ;
Begin
A:= 30; B:= 50;
Writeln(a*b);
Writeln(’a+b’);
Writeln(’Xin chuc
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...

Người chia sẻ: Nguyễn Thanh Vũ
Dung lượng: | Lượt tài: 0
Loại file:
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)