kieu xau t2

... insert(); - Thay lệnh gán st2:=‘HaNoi’; và thủ tục chèn bởi các lệnh như sau và hỏi kết quả: st2:=‘ef’; Insert(‘abc’,st2, 5); st2:=‘ef’; Insert(‘abc’,st2, 0); quả. - Kết quả st2=’Ha Noi’ - Quan sát ... của chương trình. - Thủ tục thực hiện việc chèn xâu st1 vào trong biến xâu st2 bắt đầu tại vị trí vt. st2= ‘efabc’; st2= ‘abcef’; 2. Hoạt động 2: Rèn luyện kĩ năng vận dụng hàm và thủ tục. HOẠT...

Ngày tải lên: 04/11/2013, 16:11

Ngày tải lên: 24/10/2013, 02:11

... gán st2:=‘HaNoi’; và thủ tục chèn bởi các lệnh như sau và hỏi kết quả: st2:=‘ef’; Insert(‘abc’,st2, 5); st2:=‘ef’; Insert(‘abc’,st2, 0); - Quan sát chương trình để dự tính kết quả. - Kết quả st2=’Ha ... của chương trình. - Thủ tục thực hiện việc chèn xâu st1 vào trong biến xâu st2 bắt đầu tại vị trí vt. st2= ‘efabc’; st2= ‘abcef’; 2. Hoạt động 2: Rèn luyện kĩ năng vận dụng hàm và thủ tục. HOẠ...

Ngày tải lên: 24/10/2013, 02:11

... Write(‘nhap ho ten thu hai ’); Readln (Xau2 ); If length (Xau1 ) > length (Xau2 ) then write (Xau1 ) Else write (Xau2 ); readln End. Ví dụ ... User crt; Var Xau1 , Xau2 : string; Begin Clrscr; Write(‘nhap ho ten thu nhat ’); Readln (Xau1 ); Write(‘nhap ho ... Begin Write (‘nhap xau ’); readln (x); For i:=1 to length(x) do If x[i]= ‘ ’ then delete(x,i,1); Writeln(‘ xau khi d...

Ngày tải lên: 06/09/2012, 16:32

... pos và lấy number ký tựlấy từ vị trí pos và lấy number ký tựst=st1+st2; ghép xâu st1 với st2st=st1+st2; ghép xâu st1 với st2hàm đối với ký tự : hàm đối với ký tự : toupper(ch); đổi ký tự thành ... }} 44Khai báo mảng xâu ký tự :Khai báo mảng xâu ký tự :string ten_mang _xau[ so_phan_tu];string ten_mang _xau[ so_phan_tu];Giả sử ta khai báo mảng xâu :Giả sử ta khai báo mảng xâu :string ....

Ngày tải lên: 05/11/2012, 11:46

Ngày tải lên: 04/06/2013, 01:26

Ngày tải lên: 05/06/2013, 01:26

... Var s1,s2:string[30]; Begin clrscr; s1:=‘ PC ‘; s2:=‘IBM486’; insert(s1,s2,4); writeln( xau s2 sau khi chen xau s1 vao la:’); writeln(s2); readln; End.

Ngày tải lên: 21/06/2013, 01:25

... Insert: Insert(st1,st2,vt) Chức năng: Chèn xâu st1 vào xâu st2 bắt đầu tại vò trí vt. - giới thiệu cấu trúc chung cuả thủ tục Insert -Cho ví dụ: VD: var st1,st2:string; Begin St1:=’ ‘; St2:=’hanoi’ ... tục Insert -Cho ví dụ: VD: var st1,st2:string; Begin St1:=’ ‘; St2:=’hanoi’ Inrert(st1,st2,3); Write(st2) Readln End. ? kết quả của chương trình in ra mà - Quan satù cấu trúc chung c...

Ngày tải lên: 22/06/2013, 01:26