Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn phím và in hai số đó ra màn hình theo thứ tự không giảm (tăng dần).. Bài 2 - trang 53[r]
(1)Bài Thực Hành
Sử Dụng Lệnh Điều Kiện IF THEN
(2)Các dạng câu lệnh điều kiện
a) Câu lệnh điều kiện dạng thiếu
Cú pháp:
IF <điều kiện> THEN <câu lệnh>;
b) Câu lệnh điều kiện dạng đủ
Cú pháp:
(3)Bài – trang 52
Viết chương trình nhập hai số nguyên a b khác từ bàn phím in hai số hình theo thứ tự khơng giảm (tăng dần)
Hãy xác định tốn mơ tả
(4)Bài - Xác định tốn
Viết chương trình nhập hai số nguyên a
và b khác từ bàn phím in hai số đó hình theo thứ tự không giảm
(tăng dần)
Xác định toán
INPUT:
OUTPUT:
in a trước b sau; Nếu a<b
Nhập số nguyên a b
(5)Bài – Thuật toán
Bước 1: Nhập số nguyên a, b từ
bàn phím.
Bước 2: Nếu a < b in giá trị
màn hình a trước b sau ngược lại in hình giá trị b trước a sau.
(6)Bài – Mô tả
a<b
In a trước, b sau In b trước, a sau
ĐÚNG
(7)Bài – Trang 52+53 SGK program program Sap_xep; uses uses crt; var
var A, B: integer;
begin
begin
clrscr;
write('Nhap so A: '); readln(A); write('Nhap so B: '); readln(B); if A<B then writeln(A,' ',B)
else writeln(B,' ',A); readln
end.
end.
- Lưu với tên Sap_xep
(8)Bài – trang 53
Viết chương trình nhập chiều cao hai
bạn Long Trang, in hình kết so sánh chiều cao hai bạn, dạng "Bạn Long cao hơn“, “Bạn Trang cao hơn”, “Hai bạn nhau”
Hãy xác định toán mô tả
(9)Viết chương trình nhập chiều cao hai bạn Long và Trang, in hình kết so sánh chiều cao hai bạn, dạng "Bạn Long cao hơn“, “Bạn Trang cao hơn”, “Hai bạn nhau”
Xác định toán INPUT:
OUTPUT:
Bài - Xác định toán
Nhập chiều cao Long Trang
in "Bạn Long cao hơn”, nếu Long > Trang
in “Bạn Trang cao hơn”, nếu Long < Trang
(10)Bài - Thuật toán
Bước 1: Nhập chiều cao hai bạn
Long, Trang
Bước 2: Nếu Long > Trang in
hình “Ban Long cao hon”
Bước 3: Nếu Long < Trang in
hinh “Ban Trang cao hon” ngược lại thì in hình “Hai bạn cao nhau”
(11)Bài – Mô tả Long > Trang
?
In
Long cao
Long < Trang ?
In
Trang cao
In
Hai bạn
ĐÚNG ĐÚNG
(12)Bài - trang 53
program Ai_cao_hon; uses crt;
var Long, Trang: Real; begin
clrscr;
write('Nhap chieu cao cua Long:'); readln(Long);
write('Nhap chieu cao cua Trang:'); readln(Trang);
If Long>Trang then writeln('Ban Long cao hon'); If Long<Trang then writeln('Ban Trang cao hon')
else writeln('Hai ban cao bang nhau'); readln
end
- Lưu chương trình với tên Aicaohon
(13)(14)Bài - Thuật toán sửa lại
Bước 1: Nhập chiều cao hai bạn
Long, Trang
Bước 2: Nếu Long > Trang in
hình “Ban Long cao hon”
Bước 3: Nếu Long < Trang in
hình “Ban Trang cao hơn”
Bước 4: Nếu Long = Trang in
màn hình “Hai bạn cao nhau”
(15)Bài – sửa lại
program Ai_cao_hon; uses crt;
var Long, Trang: Real; begin
clrscr;
write('Nhap chieu cao cua Long:'); readln(Long);
write('Nhap chieu cao cua Trang:'); readln(Trang);
If Long>Trang then writeln('Ban Long cao hon'); If Long<Trang then writeln('Ban Trang cao hon'); If Long=Trang then writeln('Hai ban cao bang nhau');
(16)(17)Bài 3
Nhập ba số dương a, b, c từ bàn
phím, kiểm tra in hình kết quả kiểm tra ba số độ
dài cạnh tam giác hay không.
ý tưởng: Ba số dương a, b, c là độ
dài cạnh tam giác
chỉ a + b > c, b + c > a c + a > b
b
(18)Bài – Mô tả
a+b>c a+c>b b+c>a
in hình
a, b, c ba cạnh tam giác
in hình
a, b, c khơng ba cạnh tam giác
ĐÚNG
(19)Bài – trang 54
Program Ba_canh_tam_giac; uses crt;
Var a, b, c: real; Begin
Clrscr;
write('Nhap ba so a, b va c:'); readln(a,b,c);
If (a+b>c) and (b+c>a) and (c+a>b) then writeln('a, b va c la canh cua
mot tam giac!')
(20)(21)Dặn dò
Về nhà học bài, làm lại thực
hành nhà có máy tính.