BAI TOAN LOAI BO KI TU TRANG TRONG XAU
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 (17.79 KB, 1 trang )
<span class='text_page_counter'>(1)</span>{viet chuong trinhnhap vao 1 chuoi tu ban phim va in ra chuoi thu duoc bang cac loai bo cac dau cach neu co,de lai 1 dau cach} var s:string; i,t,j,d:integer; begin write('nhap vao xau :'); readln(s); while (s[1]=' ') do begin delete(s,1,1); i:=i-1; end; for i:=1 to length(s) do if (s[i]=' ') and (s[i+1]=' ') then begin delete(s,i,1); i:=i-1; d:=d-1; end; writeln('xau ki tu con lai la:',s); readln; end..
<span class='text_page_counter'>(2)</span>
