Tin học 9 bài 4

Bài 4: Cấu trúc chương trình Turbo Pascal I Cấu trúc: Gồm phần: - Phần 1: Dòng tiêu đề - Phần 2: Phần khai báo - Phần 3: Phần thân chương trình Phần Program ̺ Tênchươngtrình; Phần USES ̺ Các thư viện chuẩn; LABEL ̺ Khai báo nhãn; CONS ̺ Khai báo hằng; TYPE ̺ Khai báo kiểu liệu mới; Var ̺ Khai báo biến; Function ̺ Khai báo hàng; Procedure ̺ Khai báo thủ tục; Begin; Các lệnh nhập liệu; Các lệnh tính toán; Phần Các lệnh xuất / kết quả; Readln; End Khai báo biến: a Mẫu lệnh: Var ̺ Tên_biến: Kiểu liệu biến; VD: Var ̺ a,b: Integer; c: Real; II Các lệnh nhập, xuất liệu: Lệnh nhập liệu: a Mẫu lệnh: Read (biến); Readln (biến); Read (biến 1, biến 2, ); b VD: Readln (a); Readln (biến 1, biến 2, ); Readln (a,b); Readln (b); Lệnh gán giá trị cho biến: a Mẫu lệnh: Tên biến:= giá trị cua biến; VD: c:= 7; a:= 5; b:= c – a; Lệnh xuất liệu: a Mẫu lệnh xuấ liệu biến: Write (biến); Write (biến 1, biến2, ); Writeln (biến); Writeln (biến 1, biến2, ); b VD: Write (a:5); in số nguyên a chiếm chỗ Write (c:5:2); in số thực c chiếm chỗ, số sau dấu phẩy c Mẫu lệnh xuấ liệu chữ: Write (‘Dãy kí tự’); Writeln (‘Dãy kí tự’); d In dòng chống: Writeln; BÀI TẬP THỰC HÀNH Bài 1: Viết chương trình xuất hình xâu sau: - Chao mung doi tuyen bong da Viet Nam - Tai Seagame 22 a Dùng lệnh Write để kết hai xâu xuất dòng b Dùng hai lệnh Write để có kết câu a c Dùng lệnh để hai xâu xuất hai dòng Bài 2: Tìm câu lệnh gán sau: a tongso:=a+b b TBC:=(3+4+5)/3 c Soam:0 d Soduong::0 Bài 3: Thêm, bớt, sửa lại chương trình sau cho đúng: Program ̺ Timhaiso; Var ̺ m: Integer; n: Real; Ch: String; Begin m:=19; n:=26.62; Ch:=‘hoc di doi voi hanh’, Writeln (‘So nguyen m=‘m’); Writeln (‘So thuc n=‘,n); Writeln (‘Cau tuc ngu:’,’ch’); End Bài 4: Viết chương trình khai báo biến x, y, z có kiểu nguyên, thực lệnh gán x 2, y 4, z tích x y Xuất kết sau: a Tong hai so x va y la: (kết đúng) b Hieu hai so x va y la: (kết đúng) c (kết đúng) la ket qua cua hai so x va y ... tongso:=a+b b TBC:=(3 +4+ 5)/3 c Soam:0 d Soduong::0 Bài 3: Thêm, bớt, sửa lại chương trình sau cho đúng: Program ̺ Timhaiso; Var ̺ m: Integer; n: Real; Ch: String; Begin m:= 19; n:=26.62; Ch:=‘hoc... (‘So thuc n=‘,n); Writeln (‘Cau tuc ngu:’,’ch’); End Bài 4: Viết chương trình khai báo biến x, y, z có kiểu nguyên, thực lệnh gán x 2, y 4, z tích x y Xuất kết sau: a Tong hai so x va y la: (kết