TAILIEUCHUNG - Tự học lập trình Pascal tập 4 part 4

Tham khảo tài liệu 'tự học lập trình pascal tập 4 part 4', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | Phần 2. HƯỚNG DẨN 75 Writeln với a1 b1 d - Readln a 1 b1 d Writeln với a2 . b2 c2- Readln a2 b2 c2 GHPT a1 b1 c1 a2 b2 c2 Read In End. 14. Procedure INSERT St1 string VarSt2 string Vitri byte chèn xẳu St1 vào St2 bắt đầu từ VỊ tri VITRỈị Var i byte S String Begin If vitri length St2 or vitri 1 then Write Không thể chèn ra ngoài xàu Else if vitri 1 then s St1 St2 Else Begin S xâu rỗng For i 1 to vitri-1 do S S St2 i S S St1 For i Vitri to length StZ do S S St2 i St2 S End End 15. Procedure DELETE Var st string Vitri sokytu byte xoá đi SỐ kỉ tự là sokytu kể từ VỊ trí Vitri trong xâu sộ Var i byte . S string 76 Tự ÍẠẾ Ptn ư Begin If vitri 1 or vitri length st then Write Không thể xoá ở ngoài xâu1 st Else If sokytu length st - vitri 1 then Write Không thể xoá được quá số ký tự Else Begin S if vitri 1 then S copy St Sokytu 1 length St -Sokytu Else Begin For i 1 to vitri-1 do S S St i For i-Vitri sokytu to Jength St do S S St i End St S End End 16. Program P4216 Uses Crt Var a b c real Procedure Nhap Var a b c real Procedure input Vara real tenbien Char Begin Repeat Write Nhập tenbien Readln x1 Phần 2. HƯỚNG DẪN 77 Until x1 0 End Begin bát đắu thủ tục nhập lnpưt a a lnput b b lnput c c End kết thức thủ tục nhập r . Procedure Kiemtra a b c Real Begin If a b c and b a c and c a b then Write a b và c Lập thành ba cạnh của một1 tam giác Else Wỉíte Không lập thành ba cạnh của một tam giác End Procedure Trungjuyen a b c Real Var ma mb me real Begin ma sqrt 2 sqr b 2 sqr c -sqr a 4 mb sqrt 2 sqr a 2 sqr c -sqr b 4 mcj sqrt 2 sqr a 2 sqr b -sqr c 4 Write Các trung tuyến của tam giác là Wiite ma ma mb- mb me- me End Procedure Dientich a b c real Var p S real Begin p a b c 2

• Kỹ thuật lập trình
• Tài liệu lập trình Pascal
• bài giảng lập trình Pascal
• giáo trình lập trình Pascal
• kinh nghiệm lập trình Pascal
• hướng dẫn lập trình Pascal
• Ngôn ngữ lập trình Pascal
• Bài giảng Ngôn ngữ lập trình Pascal
• Thực hành Turbo Pascal
• Turbo Pascal Version 5
• Turbo Pascal Version 7
• Cách khởi động Turbo Pascal
• Turbo Pascal
• lập trình Turbo Pascal
• kỹ thuật lập trình Turbo Pascal
• kinh nghiệm lập trình Turbo Pascal
• hướng dẫn lập trình Turbo Pascal
• phương pháp lập trình Turbo Pascal
• Bài giảng môn Lập trình Pascal
• Môn Lập trình Pascal
• Lập trình Pascal
• Kỹ thuật Lập trình Pascal
• Cấu trúc chương trình Pascal
• Ngôn ngữ Pascal
• Môi trường làm việc của Turbo Pascal
• Lệnh cơ bản trong Pascal
• Cấu trúc một chương trình Pascal
• Thuật toán lập trình
• Tự học lập trình Pascal
• Bài tập lập trình Pascal
• Kỹ thuật lập trình
• Học lập trình Pascal
• Kinh nghiệm sử dụng
• Lập trình căn bản
• Ngôn ngữ lập trình
• Kỹ thuật pascal
• Tài liệu về pascal
• Giáo trình pascal căn bản