Bài Bài toán đặt vấn đề Bài toán 1: Viết chơng trình tính chu vi (CV) diện tích (S) hình chữ nhật, biết chiều dài a = 12, chiỊu réng b = ? • H·y khai báo biến cần dùng chơng trình ã Viết lệnh gán để tính chu vi, diện tích hình chữ nhËt  Var a,b,CV,S : byte;  a:=12; b:=8; CV:=(a+b)*2; S:=a*b; Bài toán 2: Viết chơng trình tính in hình chu vi (CV) diện tích (S) hình chữ nhật, với chiều dài a chiều rộng b ? ã HÃy nêu cách giải toán trên? Để giải toán ngôn ngữ lập trình cung cấp thủ tục chuẩn vào/ra đơn giản I Các thủ tục chuẩn vào/ra đơn giản Nhập liệu vào từ bàn phím Thao t¸c Có ph¸p LƯnh pascal Read(); Nhập thông tin từ bàn phím Readln(); ã Danh sách biến vào: hay nhiều biến đơn, trờng hợp nhiều Nhp chiu di, chiu rng ca hỡnh ch nht: Ví dụ: biến đơn phải cách bëi dÊu ’,’ Readln(a,b); • Thđ tơc READLN cã thể tham số dùng để tạm dừng chơng trình ngời dùng ấn phím Enter (Readln;) 2 Đa d liu hình: liu hình:u hình: * Cấu trúc câu lệnh: Write(); Writeln(); Trong đó: Danh sách kết quả: Có thể tên biến, biểu thức, hàm * Các xâu thờng đợc dùng để đa thích để tách kết * Các thành phần kết đợc viÕt c¸ch bëi dÊu ’,’ * Trong thđ tơc Write Writeln sau kết (biến, hằng, biĨu thøc) cã thĨ cã quy c¸ch Quy c¸ch có dạng: + Đối với kết thực : : : + Đối với kết khác : : Ví dô: Write(‘ chieu Chu vidai, hinh rong chuHCN nhatla= :’,a, ’,CV:7:2); ’ ’,b); Mét sè vÝ dô VÝ dô 1: HÃy nêu tên thành phần thủ tục chơng trình sau: Phần khai báo Program VD_1; Var N: Byte; BEGIN Write(‘ Lop ban co bao nhieu nguoi: ); Readln(N); Phần thân ch ơng trình Thủ tục nhập liệu từ bàn phím Thủ tục in kết hình Writeln( That the a! Vay la ban co ‘,N-1,’ nguoi ban lop ’); Writeln(‘ Go Enter de ket thuc chuong trinh.); Readln; END Chươngưtrìnhưchạyưvàưchoưkếtưquảưnhưưsau: Lop ban co bao nhieu nguoi: - 42 That the a! Vay ban co 41 nguoi ban lop * Khi nhập giá trị cho nhiều biến, giá trị cách mét dÊu c¸ch * NhËp xong nhÊn phÝm ENTER ®Ĩ thùc hiƯn lƯnh tiÕp theo VÝ dơ 2: ViÕt chơng trình tính in hình chu vi (CV) diện tích (S) hình chữ nhật, với chiều dài a chiều rộng b Program VD_2; Var a,b,CV,S: real; BEGIN Write(‘ Nhap chieu dai va chieu rong cua HCN: ’); Readln(a,b); CV:= (a+b)*2; S:= a*b; Writeln(‘ Chu vi HCN = ’, CV:7:2); Writeln(‘Dien tich HCN =,S:7:2); Readln; END Bài 8: Soạn thảo, dịch, thực hiệu chỉnh chơng trình Soạn thảo: Nh soạn thảo văn MS Word Biên dịch chơng trình: Nhấn tổ hợp phím Alt + F9 Chạy chơng trình: Nhấn tổ hợp phím Ctrl + F9 Lu chơng trình (file): F2 Mở tệp: F3 Đóng cửa sổ chơng trình: Alt + F3 Thoát khỏi chơng trình Pascal: Alt + X HÃy nhớ! Thủưtụcưnhậpưthôngưtinưtừưbànưphím Read(); Readln(); Thủưtụcưđưaưthôngưtinưraưmànưhình Write(); Writeln(); Thông thờng chơng trình cần có hỗ trợ từ tệp th viện TURBO.TPL Chơng trình Pascal soạn thảo, dịch thực tệp Turbo.exe ... nêu cách giải toán trên? Để giải toán ngôn ngữ lập trình cung cấp thủ tục chuẩn vào/ra đơn giản I Các thủ tục chuẩn vào/ra đơn giản Nhập liệu vào từ bàn phím Thao tác Cú pháp Lệnh pascal Read(