Tiến muốn biết diện tích rẫy nhà mình là bao nhiêu, ba mẹ Tiến chỉ cho biết rẫy nhà mình hình chữ nhật và có chiều dài là A mét, chiều rộng là B mét.. Bạn ấy đã viết chương trìn[r]
(1)(2)(3)(4)I LÝ THUYẾT
1 Câu lệnh gán
<Biến>:= <Biểu thức>[; ]
2 Thủ tục nhập liệu
READ/READLN(<danh sách biến vào>) [; ]
3 Thủ tục xuất liệu
(5)II BÀI TẬP
Bài 1
Cho Chương trình Pascal sau:
{1} Program bai tap1;
{2} Var y, z = integer; x: byte;
{3} Begin
{4} x:= 300; {5} y:=
{6} z = x*y; {7} write (z); {8} readln
{9} End
30 29 28 27 26 25 24 23 22 21 20 19 18 17 16 15 14 13 12 11 109876543210 3132 33 34 3536 3738 39 4041 42464847 44435345 52 5150 49616062 595754586771706463565569686665 80 79787677 75 749073728889 878685 84838281
100949998919796959392
(6)II BÀI TẬP
Bài 1: Bài tập kiểm tra sửa lỗi {1} Program bai tap1;
{2} Var y, z = integer; x: byte;
{3} Begin
{4} x:= 300; {5} y:=
{6} z = x*y; {7} write (z); {8} readln
{9} End
Dịng Lỗi Sửa lỗi
1 Đặt tên chương trình
sai baitap1
2 Dấu = khai báo
biến Dấu = thành : Biến x vượt
phạm vi kiểu liệu
byte
Khai báo x: integer;
5 Thiếu dấu ; Thêm dấu ;
6 Thiếu dấu : lệnh
(7)II BÀI TẬP
Bài 2
(8)II BÀI TẬP
Bài 2
{1} READLN(A);
{2} WRITELN(‘DIEN TICH:’, S:8:2); {3} VAR A, B, S: REAL;
{4} BEGIN
{5} WRITE(‘NHAP CHIEU DAI:’); {6} END
{7} PROGRAM DIENTICH;
{8} WRITE(‘NHAP CHIEU RONG:’); {9} READLN(B);
(9)Gợi ý:
* Thuật toán
Bước 1: Nhập A,B Bước 2: S <- A*B
(10)II BÀI TẬP
Bài 2: Bài tập xếp câu lệnh
{7} PROGRAM DIENTICH;
{3} VAR A, B, S: REAL;
{4} BEGIN
{5} WRITE(‘NHAP CHIEU DAI:’);
{1} READLN(A);
{8} WRITE(‘NHAP CHIEU RONG:’);
{9} READLN(B);
{10} S:= A*B;
{2} WRITELN(‘DIEN TICH:’, S:8:2);
{11} READLN
{6} END
{1} READLN(A);
{2} WRITELN(‘DIEN TICH:’, S:8:2);
{3} VAR A, B, S: REAL;
{4} BEGIN
{5} WRITE(‘NHAP CHIEU DAI:’);
{6} END
{7} PROGRAM DIENTICH;
{8} WRITE(‘NHAP CHIEU RONG:’);
{9} READLN(B);
{10}S:= A*B;
(11)II BÀI TẬP
Bài 3: Bài tập lập trình
Chuẩn bị cho liên hoan lớp, bạn nữ mua X cân táo, Y cân nho Biết giá cân táo D đồng, nho có giá gấp 2.5 giá táo Hỏi bạn nữ phải trả đồng
a Xác định tốn
•Input: Số cân táo (X), số cân nho (Y), giá cân táo (D)
(12)II BÀI TẬP
Bài 3: Bài tập lập trình
a Xác định tốn
•Input: Số cân táo (X), số cân nho (Y), giá cân táo (D)
•Output: Tổng số tiền phải trả
b Tổ chức liệu
Biến: X, Y, D, Tien: REAL
c Thuật toán
B1: Nhập X, Y, D
B2: Tien X*D + Y*2.5*D
(13)II BÀI TẬP
Bài 3: Bài tập lập trình
d Chương trình
B 1 B
2 B 3
(14)BÀI TẬP VẬN DỤNG
1 Viết chương trình giải tốn
Tính diện tích tam giác ABC biết chiều dài cạnh a, b, c
Gợi ý: Sử dụng công thức Heron: S=
Với p=(a+b+c)/2
) (
* ) (
* ) (
* p a p b p c
(15)