Viết chương trình tính diện tích hình chữ nhật

Câu hỏi: Viết chương trình tính diện tích hình chữ nhật

Lời giải:

Ví dụ: Hãy viết chương trình tính diện tích hình chữ nhật có chiều dài là a và chiều rộng là b.

program Hinh_Chu_Nhat;

uses crt;

var a,b,S: integer;

begin

writeln(‘Nhap_chieu_dai:’);

readln(a);

writeln(‘Nhap_chieu_rong:’);

readln(b);

S:=(a*b);

writeln(‘Dien tich la:’,P);

readln

end.

Cùng Top lời giải tìm hiểu thêm về chương trình Pascal nhé.

1. Định nghĩa chương trình Pascal

- Pascal (phiên âm tiếng Việt: Pát-xcan) là một ngôn ngữ lập trình cho máy tính thuộc dạng mệnh lệnh và thủ tục, được Niklaus Wirth phát triển vào năm 1970. Pascal là ngôn ngữ lập trình đặc biệt thích hợp với kiểu lập trình cấu trúc và cấu trúc dữ liệu, ngôn ngữ lập trình này được đặt theo tên của nhà toán học, triết gia và nhà vật lí người Pháp Blaise Pascal.

2. Lịch sử thiết kế ngôn ngữ máy tính

Những nỗ lực ban đầu

- Phần lớn lịch sử của thiết kế ngôn ngữ máy tính trong những năm 1960 là ngôn ngữ ALGOL 60. ALGOL được phát triển trong những năm 1950 với mục tiêu rõ ràng để có thể mô tả rõ ràng các thuật toán. Nó bao gồm một số tính năng cho lập trình có cấu trúc vẫn còn phổ biến trong các ngôn ngữ cho đến ngày nay.

- Ngay sau khi được giới thiệu, vào năm 1962, Wirth bắt đầu nghiên cứu luận án của mình với Helmut Weber về ngôn ngữ lập trình Euler. Euler được dựa trên cú pháp của ALGOL. Mục tiêu chính của nó là thêm các danh sách và kiểu động, cho phép nó được sử dụng trong các vai trò tương tự như Lisp. Ngôn ngữ được xuất bản vào năm 1965.

- Vào thời gian này, một số vấn đề của ALGOL đã được xác định, đặc biệt là thiếu một hệ thống chuỗi tiêu chuẩn hóa. Nhóm được giao nhiệm vụ duy trì ngôn ngữ đã bắt đầu thực hiện ALGOL X để xác định các cải tiến, kêu gọi đệ trình. Wirth và Tony Hoare đã thêm chuỗi và làm mới một số cú pháp. Các nỗ lực của ALGOL X làm cho ngôn ngữ ngày càng phức tạp hơn ALGOL 68. Sự phức tạp của ngôn ngữ này dẫn đến khó khăn đáng kể trong việc tạo ra các trình biên dịch hiệu suất cao, và nó không được sử dụng rộng rãi trong ngành. Do đó, Wirth đã viết một trình biên dịch cho ngôn ngữ máy tính, được gọi là ALGOL W.

3. Đặc điểm của ngôn ngữ lập trình Pascal 

Những đặc điểm của ngôn ngữ lập trình Pascal:

- Pascal có ngữ pháp và ngữ nghĩa đơn giản, mang tính logic, cấu trúc chương trình rõ ràng và dễ hiểu.

- Đây là ngôn ngữ thích hợp cho kiểu lập trình theo cấu trúc, đặc biệt dễ sửa chữa và cải tiến.

4. Làm quen với Turbo Pascal trong chương trình

Ví dụ về chương trình Pascal

4.1 Các thành phần trên cửa sổ Turbo Pascal

- Nhấn phím F10 để mở bảng chọn, sử dụng các phím mũi tên (← và →) để di chuyển qua lại giữa các bảng chọn.

- Nhấn phím Enter để mở một bảng chọn.

- Mở các bảng chọn khác: Nhấn phím tổ hợp phím Alt và phím tắt của bảng chọn (chữ màu đỏ ở tên bảng chọn, ví dụ phím tắt của bảng chọn File là F, bảng chọn Run là R,…)

- Sử dụng các phím mũi tên lên và xuống (↑ và ↓) để di chuyển giữa các lệnh trong một bảng chọn.

- Nhấn tổ hợp phím Alt + X để thoát khỏi Turbo Pascal.

- Để biên dịch chương trình ta nhấn tổ hợp phím Alt + F9.

- Để chạy chương trình ta nhấn tổ hợp phím Ctrl + F9.`

Lưu ý: 

- Pascal không phân biệt chữ hoa, chữ thường: begin, BeGin hay BEGIN đều đúng.

- Các từ khóa của Pascal: program, begin, end. 

- Lệnh kết thúc chương trình là end. (có dấu chấm), các câu lệnh sau lệnh này sẽ bị bỏ qua trong quá trình biên dịch chương trình.

- Mỗi câu lệnh được kết thúc bằng dấu chấm phẩy (;)

- Lệnh Writeln: in xong thông tin và đưa con trỏ xuống dòng. Lệnh Write: in xong thông tin nhưng không đưa con trỏ xuống dòng. (Thông tin có thể là văn bản hoặc là số).

- Lệnh Read(<biến>); : Dùng để đọc biến được nhập từ bàn phím.

- Lệnh Readln(<biến>);: Dừng nhập các biến từ bàn phím.

- Lệnh Readln; : Dừng chương trình

- Lệnh Clrscr; dùng để xóa màn hình kết quả.  

4.2 Ví dụ một chương trình Pascal đơn giản

- Vì các bạn chưa học về biến nên trong ví dụ đầu tiên này mình sẽ đưa ra một chương trình rất căn bản.

Ví dụ 1: In ra thông tin cá nhân của bạn, mỗi thông tin trên một hàng.

1 2 3 4 5 6 7 8 9

PROGRAM PascalStructure; BEGIN     write('Toi ten la: Nguyen Van Cuong');     readln;     write('Email: [email protected]');     readln;     write('BLog: freetuts.net');     readln; END.

Ví dụ 2: Viết chương trình nhập thông tin cá nhân của bạn, sau đó in thông tin ra màn hình.

Ví dụ này sẽ khó hơn vì bạn sẽ phải sử dụng biến và hàm INPUT như read.

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

PROGRAMPascalStructure; VAR     name : string;     age : integer; BEGIN     writeln('Nhap ten cua ban');     readln(name);           writeln('Nhap tuoi cua ban');     readln(age);           writeln('Ban ten la: ', name);     writeln('Tuoi cua ban la: ', age);     readln; END.