TRƯỜNG THPT QUỲNH THỌ
Lớp 11A6

Nhiệt liệt chào mừng các quý thầy cô về dự giờ thăm lớp

BÀI 7, BÀI 8:
CÁC THỦ TỤC CHUẨN VÀO RA ĐƠN GIẢN.
SOẠN THẢO, DỊCH, THỰC HIỆN VÀ HIỆU CHỈNH CHƯƠNG TRÌNH
Bài toán đặt vấn đề
?
Viết chương trình tính chu vi (CV) và diện tích (S) của hình chữ nhật, biết chiều dài a = 12, chiều rộng b = 8.
Bài toán
Hãy khai báo các biến cần dùng trong chương trình?
 Var a,b,CV,S : byte;
Viết lệnh gán tính chu vi, diện tích hình chữ nhật?
 a:=12; b:=8;
CV:=(a+b)*2;
S:=a*b;
Nhập a,b
Xuất S, CV
S:=a*b;
CV:=2*(a+b);
Xác định bài toán:
- Input: a, b.
- Output: S, CV
Viết chương trình tính và in ra màn hình chu vi (CV) và diện tích (S) của hình chữ nhật, với chiều dài a và chiều rộng b bất kì ?

Xác định Input, Output của bài toán trên?
Để giải quyết bài toán trên các ngôn ngữ lập trình cung cấp các thủ tục chuẩn vào ra đơn giản.
* Khi giải quyết một bài toán, ta phải đưa dữ liệu vào máy tính xử lí.
- Việc đưa dữ liệu bằng lệnh gán sẽ làm cho chương trình chỉ có tác dụng với một dữ liệu cố định. Để chương trình giải quyết được bài toán tổng quát hơn, ta phải sử dụng thủ tục nhập, xuất dữ liệu.
Readln
Read
Writeln
Write
I. CÁC THỦ TỤC CHUẨN VÀO RA ĐƠN GIẢN.
Read();
Danh sách biến vào: là một hay nhiều biến đơn, trường hợp nhiều biến đơn phải viết cách nhau bởi dấu phẩy ‘,’.
Cú pháp:
Readln();
1.Nhập dữ liệu vào từ bàn phím
Ý nghĩa:
Cho phép nhập dữ liệu vào từ bàn phím.
Readln(a,b);
10 20
Readln(R);
Ví dụ 1: Hãy nhập vào bán kính R của đường tròn?
Read (a,b);
Ví dụ 2: Nhập dữ liệu từ bàn phím để giải phương trình ax+b=0?
100
Read (R);
1.Nhập dữ liệu vào từ bàn phím
Khi nhập giá trị cho nhiều biến thì những giá trị này gõ cách nhau 1 dấu cách (Space) hoặc 1 lần nhấn Enter và nhập xong ta nhấn Enter để kết thúc nhập.
Readln(a);
Ví dụ 3: Viết thủ tục nhập vào chiều dài a, chiều rộng b của HCN?
Readln(b);
Write(‘Nhap chieu dai a:’);
Write(‘Nhap chieu rong b:’);
Readln(a,b);
Cách 1:
Write(‘nhap chieu dai, chieu rong a, b:’);
Cách 2:
4
Nhap chieu dai a:4
Nhap chieu rong b:
Hoặc
1.Nhập dữ liệu vào từ bàn phím
_
_
Readln(a);
Readln(b);
* Để việc nhập dữ liệu cho biến được dễ dàng hơn ta sử dụng thêm thủ tục:
Write(‘thong bao’);
Read(a); Read(a,b);
Read(); Readln();
Readln(a,b);
Em hãy chỉ ra các câu lệnh bị lỗi
A
B
C
D
E
C
D
Write();
Danh sách kết quả có thể là tên biến, biểu thức, hàm chuẩn hoặc hằng số, (Các hằng xâu thường được dùng để đưa ra chú thích hoặc để tách các kết quả).
Các thành phần trong kết quả được viết cách nhau bởi dấu phẩy.
Writeln();
2. Đưa dữ liệu ra màn hình
Cú pháp:
Ý nghĩa: Cho phép xuất dữ liệu ra màn hình.
Write(‘Chieu dai, rong va dien tich HCN la : ’ ,a,’ ‘ ,b,’ ‘, a*b);
Ví dụ 4:
Hằng
Biến
Biểu thức
Em hãy chỉ ra tên biến, biểu thức, hằng số trong câu lệnh sau?
Chieu dai, rong va dien tich HCN la : 8 6 48
Write(‘Dien tich HCN la : ’ ,a*b);
Theo em sự khác nhau giữa thủ tục Write và Writeln này là gì?
Thủ tục write: sau khi đưa kết quả ra màn hình thì con trỏ không xuống dòng.
Thủ tục writeln: sau khi đưa kết quả ra màn hình thì con trỏ xuống đầu dòng tiếp theo.
Thủ tục writeln không có tham số dùng để xuống dòng.
Write(‘Lop 11A6’);
Write(‘hoc tot’);
Lop 11A6 hoc tot
Writeln(‘Lop 11A6’);
Writeln(‘hoc tot’);
Lop 11A6
hoc tot
_
_
Write(‘Lop 11A6’);writeln;
Write(‘hoc tot’);
Lop 11A6
Hoc tot
_
Ví dụ 5:
Ví dụ 6: Gán a: = 8; b: = 16; x : = 22.2222;
Write( a:5 , b:4 , a+b:3);
Write( a:7:2 );
Write( x:8:3 );
Write( ‘Hello’:3 );
Trong thủ tục Write hoặc Writeln sau mỗi kết quả ra (biến, hằng, biểu thức) có thể có thêm quy cách ra. Quy cách ra có dạng:
+ Kết quả thực : <độ rộng> :
+ Kết quả khác : <độ rộng>
_ _ _ _8 _ _ 16 _ 24

_ _ _8.00

_ _22.222

Hello
Soạn thảo: Gõ nội dung chương trình lên màn hình soạn thảo của Turbo Pascal.
II. SOẠN THẢO, DỊCH, THỰC HIỆN
VÀ HIỆU CHỈNH CHƯƠNG TRÌNH
Màn hình làm việc của Pascal
Gõ nội dung chương trình lên màn hình soạn thảo của Turbo Pascal
Thanh bảng chọn
Tên tệp chương trình
Dòng
Cột
- Biên dịch chương trình: nhấn tổ hợp phím Alt + F9.
Một số thao tác thường dùng
- Ch?y chuong trỡnh: nh?n t? h?p phớm Ctrl + F9.
- Lưu chương trình: nhấn phím F2 sau đó đặt tên và nhấn Enter.
- Dúng c?a s? chuong trỡnh: nh?n t? h?p phớm Alt + F3.
- Thoỏt kh?i ph?n m?m: nh?n t? h?p phớm Alt + X.
Một số thao tác thường dùng
- M? chuong trỡnh: nh?n phớm F3.
*** Một số ví dụ
Program VD_1;
Var N: Byte;
BEGIN
Write(‘ Lop ban co bao nhieu nguoi: ‘);
Readln(N);
Writeln(‘ That the a! Vay la ban co ‘,N-1,’ nguoi ban trong lop ’);
Writeln(‘ Go Enter de ket thuc chuong trinh.’);
Readln;
END.
Phần khai báo
Phần thân chương trình
Thủ tục nhập dữ liệu từ bàn phím
Thủ tục in kết quả ra màn hình
Ví dụ 1: Hãy nêu tên các thành phần và các thủ tục trong chương trình sau:
VD1. Lập chương trình giải phương trình
ax + b =0(a≠0)
Gợi ý:
Cần khai báo những biến nào?
Nhập vào từ bàn phím cái gì?
Viết ra màn hình cái gì?
*** Một số ví dụ
Program gptb1;
Var a,b,x: real;
BEGIN
Nhập vào a,b
END.
*** VÍ DỤ
Viết ra nghiệm của pt
Khai báo biến a,b,x
là số thực;
Readln
Writeln(‘Nghiem cua pt x = ‘,x:6:3);
Chương trình
VD1. Lập chương trình giải phương trình ax + b =0(a≠0)
Khai báo tên CT
BEGIN
END.
Write(‘Nhap gia tri cua a,b ‘);
Readln(a,b);
Hãy nhớ!
Thông thường các chương trình cần có sự hỗ trợ từ tệp thư viện TURBO.TPL
Thủ tục nhập thông tin từ bàn phím.
Thủ tục đưa thông tin ra màn hình
Read();
Chương trình Pascal có thể soạn thảo, dịch và thực hiện bằng tệp Turbo.exe
trong pascal
Readln();
Write();
Writeln();
Bài 1: Viết chương trình hiển thị ra màn hình kết quả sau?
a. b.
1 *
121 ***
12321 *****
a.
Begin
Writeln(‘1’:3);
Writeln(‘121’:4);
Writeln(‘12321’:5);
Readln;
End.
b.
Begin
Writeln(‘*’:3);
Writeln(‘***’:4);
Writeln(‘*****’:5);
Readln;
End.
Bài tập về nhà:
Bài 2: Lập chương trình tính diện tích của hình chữ nhật có độ dài 2 cạnh a,b nhập vào từ bàn phím
Gợi ý:
Cần khai báo những biến nào?
Nhập vào từ bàn phím cái gì?
Viết ra màn hình cái gì?
Bài 2: Lập chương trình tính diện tích của hình chữ nhật có độ dài 2 cạnh a,b nhập vào từ bàn phím
Gợi ý:
Cần khai báo những biến nào?
Nhập vào từ bàn phím cái gì?
Viết ra màn hình cái gì?
CHÂN THÀNH CẢM ƠN!
SỰ THEO DÕI CỦA
QUÝ THẦY CÔ CÙNG CÁC EM HỌC SINH.