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 (2.01 MB, 25 trang )
<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>
w
w
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>
<i><b>Câu 2: Nêu cú pháp của khai báo biến?</b></i>
<i><b>Câu 3: Nêu cú pháp khai báo hằng?</b></i>
w
w
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>Câu 2: Nêu cú pháp của khai báo biến?</b></i>
<i><b>Câu 3: Nêu cú pháp khai báo hằng?</b></i>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<i><b>Câu 1: Kể tên các đại lượng cần có trong bài tốn</b></i>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<i><b>Câu 2: Liệt kê các đại lượng là biến và kiểu</b></i>
<b> dữ liệu có trong bài tốn :</b>
<b>PHIẾU </b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<i><b>Câu 2: Liệt kê các đại lượng là biến và kiểu</b></i>
<b> dữ liệu có trong bài toán :</b>
<b>PHIẾU </b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<i><b>Câu 3: Liệt kê các đại lượng là hằng và giá trị có </b></i>
<b>trong bài tốn :</b>
<b>PHIẾU </b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<i><b>Câu 3: Liệt kê các đại lượng là hằng và giá trị có </b></i>
<b>trong bài tốn :</b>
<b>PHIẾU </b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<i><b>Câu 4: Sử dụng lệnh nào để nhập giá trị cho biến:</b></i>
<b> Đơn giá, số lượng từ bàn phím</b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
<b>Thành tiền=Đơn giá * Số lượng+phí dịch vụ</b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
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>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
c. Chạy chương trình với bộ dữ liệu
Đơn giá Số lượng Thành tin
w
w
w
.th
e
m
e
g
al
le
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
c. Chạy chương trình với bộ dữ liệu
Đơn giá Số lượng Thành tin
w
w
w
.th
e
m
e
g
al
le
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
c. Chạy chương trình với bộ dữ liệu
Đơn giá Số lượng Thành tin
w
w
w
.th
e
m
e
g
al
le
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
d. Chạy chương trình với bộ dữ liệu. Quan sát kết
quả và giải thích
Đơn giá Số lượng Thành tin
w
w
w
.th
e
m
e
g
al
le
ry
.c
o
m
<i><b>Bài 1. Viết chương trình Pascal có khai </b></i>
<b>báo và sử dụng biến.</b>
Chương trình bị sai là do soluong thuộckiểu dữ
<b>* Liệt kê các lỗi nếu có trong chương trình dưới đây và </b>
<b>sửa lại cho đúng.</b>
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;
- Về xem lại bài 1.
- Xem trước bài 2.
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o
w
w
w
.t
h
e
m
e
g
a
lle
ry
.c
o