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 (443.62 KB, 11 trang )
<span class='text_page_counter'>(1)</span><div class='page_container' data-page=1>
t
Mục đích, u cầu:
<sub> Xây dựng chương trình có cấu trúc rẽ nhánh và cấu trúc lặp.</sub>
<sub> Làm quen với việc hiệu chỉnh chương trình.</sub>
<sub> Luyện tập khả năng phân tích, thiết kế và xây dựng một </sub>
chương trình hồn chỉnh.
Biết rằng bộ ba số nguyên dương a, b, c được gọi là bộ
số Pi – ta – go nếu tổng các bình phương của hai số bằng bình
phương của số cịn lại. Viết chương trình nhập từ bàn phím ba
số nguyên dương a, b, c và kiểm tra xem chúng có là bộ số Pi –
ta – go hay khơng?
Ý tưởng: Kiểm tra xem có đẳng thức nào trong ba
đẳng thức sau đây xảy ra hay không:
2 2 2
<i>c</i> <i>a</i> <i>b</i>
2 2 2
2 2 2
2 2 2
Xác định bài tốn
<b>1</b>
Phân tích bài toán
<b>2</b>
Thiết kế bài toán
<b>3</b>
Cài đặt
<b>4</b>
<b>Input:</b>
<b>Output:</b>
Đơn vị dữ liệu:
Các số a, b, c, a1, b1, c1
Đơn vị xử lý:
<b>Thuật giải chương trình:</b>
<b>Program Pi_ta_go</b>
<b>Khai báo sử dụng a, b, c, a1, b1, c1 (a, b, c nguyên dương)</b>
<b>Tính a1 := a1*a;</b>
<b>b1 := b1*b;</b>
<b>c1 := c1*c;</b>
<b>Nếu a1 = b1 + c1 hoặc b1 = a1 + c1 hoặc c1 = a1 + b1 thì</b>
<b>Xuất ra “a, b, c là bộ số Pi_ta_go”</b>
<b>Program Pi_ta_go</b>
<b>Uses crt ;</b>
<b>Var a, b, c: integer;</b>
<b>a1, b1, c1: longint;</b>
<b>Begin </b>
<b> Clrscr;</b>
<b> Write(‘Moi ban nhap vao a, b, c: ’); </b>
<b> Readln(a, b, c); </b>
<b> a1:=a; b1:=b; c1:=c; </b>
<b> a1:=a1*a; b1:=b1*b; c1:=c1*c; </b>
<b> If (a1=b1+c1) or (b1=a1+c1) or (c1=a1+b1) then </b>
<b> </b>
<b> Writeln(‘a, b, c la bo so Pi_ta_go’) </b>
<b> Else </b>
Các thao tác cần thiết trong quá trình thực hành bài tốn trên máy:
1. Gõ chương trình
2. Nhấn phím F2 để lưu chương trình với tên Pi_ta_go.pas.
3. Nhấn phím F7 để theo dõi quá trình thực hiện từng lệnh của
chương trình.
4. Nhấn tổ hợp phím Ctrl+F7→ Add swatch → nhập tên biến →
Enter để theo dõi các giá trị của biến trên cửa sổ swatches (có thể
nhấn Ctrl+F5 để thay đổi kích thước hiện thời chứa con trỏ màn
hình và phím F6 để di chuyển cửa sổ hiện thời)