BTTH 2

Các thao tác cần thiết trong quá trình thực hành bài toán trên máy:.. Nhấn phím F2 để lưu chương trình với tên Pi_ta_go.pas3[r]

t

BÀI TẬP VÀ THỰC HÀNH 2

Chương III

Mục đích, u cầu:

 Xây dựng chương trình có cấu trúc rẽ nhánh cấu trúc lặp.  Làm quen với việc hiệu chỉnh chương trình.

 Luyện tập khả phân tích, thiết kế xây dựng chương trình hồn chỉnh

Bài toán 1: Bộ số Pi – ta – go

Biết ba số nguyên dương a, b, c gọi số Pi – ta – go tổng bình phương hai số bình phương 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 kiểm tra xem chúng có số Pi – ta – go hay không?

Ý tưởng: Kiểm tra xem có đẳng thức ba đẳng thức sau xảy hay không:

2 2

c a b

2 2

a b c

2 2

b a c

2 2

Xác định tốn

1

Phân tích tốn

2

Thiết kế toán

3

Cài đặt

4

4/ Bằng toán học giải gì? 3/ Cần tìm gì?

2/ Cho trước gì?

1/ Bài tốn u cầu việc gì?

Input:

Output:

Phân tích tốn Các số a,b,c nhập từ bàn phím

Thiết kế tốn:

Đơn vị liệu:

Các số a, b, c, a1, b1, c1

 Loại số: số nguyên dương  Kiểu: a, b, c: interger

Đơn vị xử lý:

 Nhập vào số nguyên dương a, b, c  Tính bình phương a, b, c

 Kiểm tra: tổng bình phương số bình phương số cịn lại KL: ba số số Pi_ta_go

Thuật giải chương trình:

Program Pi_ta_go

Khai báo sử dụng a, b, c, a1, b1, c1 (a, b, c nguyên dương) Gán: a1:=a; b1:=b; c1:=c;

Tính a1 := a1*a; b1 := b1*b; c1 := c1*c;

Nếu a1 = b1 + c1 b1 = a1 + c1 c1 = a1 + b1 thì Xuất “a, b, c số Pi_ta_go”

Program Pi_ta_go Uses crt ;

Var a, b, c: integer; a1, b1, c1: longint; Begin

Clrscr;

Write(‘Moi ban nhap vao a, b, c: ’); Readln(a, b, c);

a1:=a; b1:=b; c1:=c;

a1:=a1*a; b1:=b1*b; c1:=c1*c;

If (a1=b1+c1) or (b1=a1+c1) or (c1=a1+b1) then

Writeln(‘a, b, c la bo so Pi_ta_go’) Else

Các thao tác cần thiết trình thực hành toá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 trình thực lệnh 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 giá trị biến cửa sổ swatches (có thể nhấn Ctrl+F5 để thay đổi kích thước thời chứa trỏ hình phím F6 để di chuyển cửa sổ thời)