Giải bài tập Pascal lớp 11 – Chương 2

Bài trước mình đã post bài Giải bài tập Pascal lớp 11 – Chương 1. Giờ mình tiếp tục post thêm bài hướng dẫn giải bài tập Pascal lớp 11 - Chương 2. Hi vọng bài này sẽ giúp các bạn phần nào đó để có hướng đi nhanh trong việc làm bài tập.

Bài thực hành số 1

Bài 1. Sự khác nhau giữa hằng có đặt tên và tên biến: Giá trị của hằng có đặt tên không thay đổi khi thực hiện chương trình còn giá trị của biến có thể thay đổi tại từng thời điểm thực hiện chương trình.

Bài 2. Khai báo biến nhằm những mục đích sau:
- Xác định kiểu của biến. Trình dịch sẽ biết cách tổ chức ô nhớ chứa giá trị của biến.
- Đưa tên biến vào danh sách các đối tượng được chương trình quản lí.
- Trình dịch biết cách truy cập giá trị của biến và áp dụng thao tác thích hợp cho biến.

Bài 3. integer, real, extended, longint.
Bài 4. D
Bài 5. C
Bài 6. (1+z)*(x+y/z)/(a-1/(1+x*x*x*x))
Bài 7.
a) (2a)/b
b) (abc)/2
c) b/(ac)
d) b/(cănbậc2của(a2+b))
Bài 8.
a)

program bai8;
uses crt;
var x,y:real;
    kt:boolean;
begin
clrscr;
write('Nhap x: ');readln(x);
write('Nhap y: ');readln(y);
kt:=false;
if ((y<1) or (y=1)) and ((y>abs(x)) or (y=abs(x))) then kt:=true;
if kt then write('Diem vua nhap thuoc phan gach cheo')
else write('Khong thuoc');
readln
end.

Ví dụ:

b)

program bai8b; 
uses crt; 
var x,y:real; 
 kt:boolean; 
begin 
clrscr;
write('Nhap x: ');readln(x);
write('Nhap y: ');readln(y); 
kt:=false;
if (abs(y)<=1) and (abs(x)<=1) then kt:=true; 
if kt then write('Diem vua nhap thuoc phan gach cheo') 
else write('Khong thuoc');
readln
end.

Ví dụ:

Bài 9.

program bai9; 
uses crt;
const pi= 3.1416;
var a,s:real;
begin 
clrscr;
repeat
write('Nhap ban kinh duong tron: '); 
readln(a);
if a<0 then writeln('Nhap lai!');
until a>0;
s:=(a*a*pi)/2;
write('Dien tich phan gach cheo: ',s:8:3);
readln
end.

Ví dụ:

Bài 10.

program bai10;
uses crt;
const g= 9.8;
var v, h:real;
begin 
clrscr;
repeat
write('Nhap do cao: ');
readln(h);
if h<0 then writeln('Nhap lai!');
until h>0;
v:=sqrt(2*g*h);
write('Van toc: ',v:8:3); 
readln
end.

Ví dụ:

Vậy là xong. Có thắc mắc gì thì các bạn comment bên dưới để mình giúp nhá :D :D

Lâm Ngọc Khương

Luôn tìm tòi, thích học hỏi! Tất cả chỉ vì con đường đã chọn. Tôi yêu công nghệ thông tin! :)