Viết chương trình nhập từ bàn phím 2 số nguyên a b và in ra màn hình số lớn nhất và số nhỏ nhất
Pascal co ban
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 (187.34 KB, 46 trang ) (1)MỤC LỤC. BÀI TẬP LÀM QUEN..........................................................................................1 PHÉP TOÁN TRONG PASCAL..........................................................................4 CẤU TRÚC RẼ NHÁNH.....................................................................................8 VÒNG LẶP BIẾT TRƯỚC SỐ LẦN LẶP LẠI.................................................19 VÒNG LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC............................................23 KIỂU MẢNG......................................................................................................26 KIỂU XÂU (Chuỗi)............................................................................................31 KIỂU DỮ LIỆU TỆP (FILE/TẬP TIN)..............................................................34 CHƯƠNG TRÌNH CON.....................................................................................37 BÀI TẬP LÀM QUEN 1. Viết chương trình in ra màn hình câu: “Hello World” Begin Writeln(‘Hello World’); Readln; End. 2. In đoạn thơ sau ra màn hình(sử dụng lệnh Write): Thuở còn thơ ngày hai buổi đến trường Yêu quê hương qua từng trang sách nhỏ Ai bảo chăn trâu là khổ Tôi mơ màng nghe chim hót trên cao Gợi ý: Begin Write(‘Thuo con tho ngay hai buoi đen truong’); Write(‘Yêu quê hương qua ….’); … Readln; End. 3. In đoạn thơ sau ra màn hình(sử dụng lệnh Writeln): Thuở còn thơ ngày hai buổi đến trường Yêu quê hương qua từng trang sách nhỏ Ai bảo chăn trâu là khổ Tôi mơ màng nghe chim hót trên cao 4. Viết chương trình tính chu vi và diện tích hình chữ nhật, với chiều dài và chiều rộng là các số nguyên nhập từ bàn phím. VD: CDai=6, CRong=4 ChuVi=20, DienTich=24; CDai=10, CRong=5 ChuVi=30, DienTich=50; CDai=7, CRong=3 ChuVi=20, DienTich=21; Giải: Var d, r: integer; S, cv: integer; Begin Write(‘nhap chieu dai:’);. |