Tin 11 Tiet 29 Bai 12 Xau

Bµi 12 Gi¸o ¸n ®iÖn tö tin häc líp 11 Nhập vào họ tên của hai học sinh, in ra màn hình họ tên dài hơn? HnaNAHP m yNeyuGN A B Bài toán đặt vấn đề: X©u lµ d·y c¸c kÝ tù trong bé m· ASCII. T I n H o c S 1 2 3 4 5 6 7  !  "#$%#&#'(#)#*+,- .%/!*+0,1  -‘ ’ 2(!*3 45%#&67$8#9:#;(3 .%/! <87( =>?%#&#(@! A3 H 1. Kh¸i niÖm 2. Khai b¸o kiÓu d÷ liÖu x©u (trong Pascal) Var <tªn biÕn> : String[®é dµi lín nhÊt]; VÝ dô: Var hoten: String[26]; "( #BC9:+87DE#,  87DE#(>FG#:$7H00- VÝ dô: Var chuthich :String; 3. C¸c thao t¸c xö lÝ x©u :    !"  # $ % ‘ ’ ‘ ’  #%‘ ’ &'()()" * $  +(), “ ” &'()//"=,<> <,<=,>,>=  ‘ #% ’ 0 #%‘ - ’  ‘ 1’2 1‘ ’  &3456" 7189:;* 7180" $<=>? :@8-A8BCDD 6E@ $1=F8  71G‘ ’  ‘ H’ 9 H ‘ ’    ! CF!I-JK BL9 L BM9 #M‘ ’ ‘ ’ D/NO/L/MPQ ’#LM’ CRBLI BMS=TIUI 2. Insert(S1,S2,vt) B9 B#‘ ’ VNNNOBLWQ ‘#’ 1FB S=TIUI 1. Delete(S,vt,n) VÝ dôý nghÜaThñ tôc C9 ‘ ’ X'C/NOQ9 8‘ ’ C4 ? 4. UPCase(ch) BL9 L BM9 #‘ ’ ‘ LM’ '/OBLBMQ9P CIUY*= >FBL BM 3. Pos(S1,S2) B9 1‘ ’ NOBQ9Z CU.  FB 2. Length(S) VÝ dôý nghÜaHµm B9 H‘ ’ C)4OBW[Q9 ‘ ’ H\-> )S=TIUI FB 1. Copy(S,vt,n) 4. Mét sè vÝ dô NhËp vµo hä tªn cña hai häc sinh, in ra mµn h×nh hä tªn dµi h¬n? 1 C¸c bíc: ThÓ hiÖn b»ng pascal 1. "( Var a,b: string; 2. IG9( BEGIN Write(‘ Nhap xau ho ten thu nhat :’); Readln(a); Write(‘Nhap xau ho ten thu hai :’); Readln(b); 3. J;%( IF Length(a)>Length(b) Then write(a) else write(b); Readln; END. Nhập vào hai xâu từ bàn phím, kiểm tra xem kí tự đầu tiên của xâu thứ nhất có trùng với kí tự cuối cùng của xâu thứ hai không? 2 Các bớc: 1. "(! 2. IG9( 3. J;%(# ! "%#&:#2(! A[1] "%#&?K(! B[x] # J787( L&)7M D2 7#M N#O NhËp vµo mét x©u tõ bµn phÝm, ®Ra ra mµn h×nh x©u thu ®Rîc b»ng c¸ch lo¹i bá c¸c dÊu c¸ch tõ x©u ®· cho? 3 2#G# #P7 ##2 .%/! 71="‘ ]H’ 7<^_-`"‘ ]H’ ThuËt to¸n  Q-"R#S(53 H-T:MU##C#E#P9:#;()VG9 9:#;MU#E#OW>)7(5- )#M N#O& #X#G## 2- . Bµi 12 Gi¸o ¸n ®iÖn tö tin häc líp 11 Nhập vào họ tên của hai học sinh, in ra màn hình họ tên dài hơn? HnaNAHP m. "( Var a,b: string; 2. IG9( BEGIN Write(‘ Nhap xau ho ten thu nhat :’); Readln(a); Write(‘Nhap xau ho ten thu hai :’); Readln(b); 3. J;%( IF Length(a)>Length(b)