Tải bản đầy đủ (.ppt) (11 trang)

BÀI GIẢNG ĐIỆN TỬ: Tin 8_Bai thuc hanh 3_ Tiet 17

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (641.68 KB, 11 trang )

<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>

<i> Bài thực hành 3</i>



<i><b>Khai báo và sử dụng biến </b></i>



<b>Tiết 17</b>


</div>
<span class='text_page_counter'>(2)</span><div class='page_container' data-page=2>

<i><b>Ôn lại kiến thức</b></i>



w


.t


h


e


m


e


g


a


lle


ry


.c


o



m


<i><b>Câu 1: Hãy cho biết biến được sử dụng để làm gì? </b></i>


Dùng để lưu trữ dữ liệu.


(Dữ liệu do biến lưu trữ sẽ thay đổi trong chương trình)


<i><b>Khai báo và sử dụng biến</b></i>



<i><b>Câu 2: Việc khai báo biến gồm những gì ? Nêu cú pháp</b></i>


của khai báo biến?


Việc khai báo biến gồm:
+ Khai báo <b>tên biến</b>


+ Khai báo <b>kiểu dữ liệu</b> của biến.


</div>
<span class='text_page_counter'>(3)</span><div class='page_container' data-page=3>

<i><b>Ôn lại kiến thức</b></i>



w


w


w


.t



h


e


m


e


g


a


lle


ry


.c


o


m


<i><b>Khai báo và sử dụng biến</b></i>



<i><b>Câu 3: Hằng là gì ? Nêu cú pháp khai báo hằng?</b></i>




Hằng là một đại lượng có <i><b>giá trị khơng đổi</b></i> trong suốt
quá trình thực hiện chương trình.



* Cú pháp khai báo hằng:


<b>Const</b> <Tên hằng> = <Giá trị của hằng>;


* Ví dụ:


</div>
<span class='text_page_counter'>(4)</span><div class='page_container' data-page=4>

<i><b>Ôn lại kiến thức</b></i>



w


.t


h


e


m


e


g


a


lle


ry


.c



o


m


<i><b>Câu 4: Sử dụng biến trong chương trình như thế nào?</b></i>

<i><b>Khai báo và sử dụng biến</b></i>



- Gán giá trị cho biến.


- Tính tốn với giá trị của biến.


- Cú pháp lệnh gán:



<b><Tên biến> := <Biểu thức và giá trị cần gán>;</b>


</div>
<span class='text_page_counter'>(5)</span><div class='page_container' data-page=5>

Các kiểu dữ liệu trong Pascal



Tên kiểu


dữ liệu Phạm vi giá trị


Byte Các số nguyên từ 0 đến 255.


Integer Số nguyên trong khoảng -32768́ đến 32767
Real Số thực có giá trị tuyệt đối trong khoảng


1.5x10-45 đến 3.4x1038́ và số 0


Char Một kí tự trong bảng chữ cái


String Xâu kí tự, tối đa gồm 255 kí tự


w


w


w


.th


e


m


e


g


al


le


ry


.c


o


m



</div>
<span class='text_page_counter'>(6)</span><div class='page_container' data-page=6>

<i><b>Thực hành bài 1:</b></i>


w


.t


h


e


m


e


g


a


lle


ry


.c


o


m


<i><b>Khai báo và sử dụng biến</b></i>




<i><b>Bài 1. Viết chương trình Pascal có khai báo và </b></i>


<b>sử dụng biến.</b>


<i><b>Bài tốn: Một cửa hàng cung cấp dịch vụ bán hàng </b></i>


thanh toán tại nhà. Khách hàng chỉ cần đăng kí số
lượng mặt hàng cần mua, nhân viên cửa hàng sẽ
trả hàng và nhận tiền thanh toán tại nhà khách
hàng. Ngồi trị giá hàng hố, khách hàng cịn phải
trả thêm phí dịch vụ. Hãy viết chương trình Pascal
để tính tiền thanh tốn trong trường hợp khách
hàng chỉ mua một mặt hàng duy nhất.


</div>
<span class='text_page_counter'>(7)</span><div class='page_container' data-page=7>

<i><b>Bài 1:</b></i>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m



<i><b>Khai báo và sử dụng biến</b></i>



program Tinhtien;


uses crt;


var soluong:integer;


dongia, thanhtien:real;


thongbao:string;


Const phi=10000;


begin


clrscr;


thongbao:='Tong so tien phai thanh toan:';
{Nhap do gia va so luong hang}


Write('Don gia:'); readln(dongia);
Write('So luong:'); readln(soluong);
thanhtien:=soluong*dongia+phi;
(*in ra so tien phai tra*)


writeln(thongbao,thanhtien:10:2);
readln



end.


<b>Khai báo biến</b>


<b>Khai báo hằng</b>


<b>Lệnh gán</b>


<b>Ghi chú</b>
<b>Nhập đơn giá</b>


<b>Nhập số lượng</b>
<b>Lệnh gán</b>
<b>In kết quả</b>
<b>a) Khởi động Pascal. Gõ chương trình sau và tìm hiểu ý </b>


</div>
<span class='text_page_counter'>(8)</span><div class='page_container' data-page=8>

<i><b>Thực hành bài 1:</b></i>


w


.t


h


e


m


e



g


a


lle


ry


.c


o


m


<i><b>Khai báo và sử dụng biến</b></i>



<b>b)Lưu chương trình với tên TINHTIEN.PAS. </b>


Dịch và chỉnh sửa các lỗi gõ, nếu có.


<b>c)Chạy chương trình với các bộ dữ liệu (đơn </b>


giá và số lượng) như sau (1000, 20), (3500,
200), (18500, 123). Kiểm tra tính đúng của
các kết quả in ra.


<b>d)Chạy chương trình với bộ dữ liệu (1, </b>


</div>
<span class='text_page_counter'>(9)</span><div class='page_container' data-page=9>

<i><b>BÀI TẬP CỦNG CỐ</b></i>


w

w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m


<i><b>? Hãy gõ chương trình sau, liệt kê các lỗi nếu có trong </b></i>


chương trình dưới đây và sửa lại cho đúng.
Program vd;
Uses crt;
Var a:=Integer;
b: real;
Const c:=3;
Begin
a:=200
b:= a/c;


Write(‘ Ket qua ‘,b);
Readln;



End.


Program vd;
Uses crt;


Var a<b>:</b>Integer;


b:Real;


Const c<b>=</b>3;


Begin


a:=200<b>;</b>


b:= a/c;


Write(‘Ket qua ‘,b);
Readln;


</div>
<span class='text_page_counter'>(10)</span><div class='page_container' data-page=10>

<i><b>DẶN DÒ</b></i>


- Về xem lại bài 1.



- Xem trước bài 2.



w


.t


h



e


m


e


g


a


lle


ry


.c


o


</div>
<span class='text_page_counter'>(11)</span><div class='page_container' data-page=11>

w


w


w


.t


h


e



m


e


g


a


lle


ry


.c


o


</div>

<!--links-->

×