Viết chương trình nhập vào xâu s đưa ra màn hình xâu đó nhưng được viết theo thứ tự ngược lại

Cách tăng GB trên win 7 [Tin học - Lớp 5]

1 trả lời

Điều kiện vòng lặp kết thúc là gì [Tin học - Lớp 8]

1 trả lời

Hãy nêu các bước tạo bảng và định dạng văn bản [Tin học - Lớp 6]

1 trả lời

Cách tăng GB trên win 7 [Tin học - Lớp 5]

1 trả lời

Điều kiện vòng lặp kết thúc là gì [Tin học - Lớp 8]

1 trả lời

Hãy nêu các bước tạo bảng và định dạng văn bản [Tin học - Lớp 6]

1 trả lời

Biểu thức gồm các toán hạng là biến xâu, biến kí tự hoặc hằng xâu được gọi là biểu thức xâu.

- Dữ liệu kiểu xâu là dãy các kí tự.

- Một xâu là một dãy các kí tự [trong bảng mã ASCII], có thể coi xâu như một mảng một chiều mà mỗi phần tử là một kí tự. Số lượng kí tự trong một xâu được gọi là độ dài của xâu. Xâu có độ dài bằng 0 là xâu rỗng.

Các ngôn ngữ lập trình đều có quy tắc, cách thức cho phép xác định:

- Biểu thức gồm các toán hạng là biến xâu, biến kí tự hoặc hằng xâu được gọi là biểu thức xâu

var : string[độ dài lớn nhất của xâu]

Lưu ý: Độ dài lớn nhất của xâu < 255.

Khi đó, độ dài lớn nhất của xâu sẽ nhận giá trị mặc định là 255.

2. Các thao tác xử lí xâu

a] Phép ghép xâu được dùng để ghép nhiều xâu thành một [kể cả đối với các hằng và biến xâu].

Ví dụ: 'Nghe' + 'An' . Kết quả: Nghe An

b] Các phép so sánh: [=], [o], [],[=] có thứ tự ưu tiên thực hiện thấp hơn phép ghép xâu và thực hiện việc so sánh hai xâu theo quy tắc sau:

Ví dụ: 'Que huong' < 'Que huong toi'.

Ví dụ: 'Ha noi' = 'Ha noi'

c] Thủ tục delete[st, V/, n] thực thực việc xóa n kí tự của biến xâu st bắt đầu từ vị trí vt.

Ví dụ: st='abcdef’; thao tác delete [st, 4, 2 ] , cho kết quả 'abcd'

d] Thủ tục insert [s1, s2, vt] chèn xâu s1 vào biến xâu s2, bắt đầu ở ví trí Vt.

Ví dụ: 1l='PC'; s2= ' IBM486 thao tác insert [s1, s2, 4];chokếtquả 'IBMPC486'

e] Hàm copy[S, vt, N] tạo xâu gồm N kí tự liên tiếp bắt đầu từ vị trí vt của xâu s.

Vi dụ: S='Bai hoc thu 9'; biểu thức copy [ s, 9, 5]; cho kết quả 'thu 9'

f]  Hàm length[s] cho giá trị là độ dài xâu s.

Vi dụ: s= 'Tin hoc' thì biểu thức length [S] có độ dài là 7.

g] Hàm pos[s1, s2] cho vị trí xuất hiện đầu tiên của xâu s1 trong xâu s2.

Ví dụ: s2='abcdef' thì biểu thức pos ['cd', s2] cho kết quả 3.

h] Hàm upcase[ch] cho chữ cái in hoa ứng với chữ cái trong ch.

Ví dụ: 'd' thì biểu thức upcase [ch] cho kết quả ' D'.

- Xâu được tạo thành bởi các kí tự, trong đó có thể có dấu cách. Dấu cách thể hiện trong các văn bản là phần trống ngăn cách giữa hai từ viết liên tiếp. Kí tự này được gõ bằng phím dài nhất trên bàn phím [Space Bar];

Trong chương trình, khi viết một xâu kí tự, ta phải viết xâu đó giữa hai dấu nháy đơn. Nhưng khi nhập từ bàn phím giá trị một xâu, ta chỉ gõ các kí tự thuộc xâu đó [rồi nhấn phím Enter].

- Xâu chỉ gồm một dấu cách được viết là ' '. Để viết xâu rỗng ta viết hai dấu nháy đơn liền nhau.

- Khi so sánh hai xâu, xâu có độ dài nhỏ hơn có thể là xâu lớn hơn [>], ví dụ:

- Khi sử dụng lệnh gán, ta có thể gán trị là một kí tự cho một biến xâu kí tự nhưng việc gán trị là một xâu kí tự cho một biến kiểu kí tự là không hợp lệ dù xâu đó có độ dài bằng i.

Ví dụ 1: Bài toán so sánh hai xâu: nhập vào họ tên của hai người vào hai biến xâu và đưa ra màn hình xâu dài hơn, nếu bằng nhau thì đưa ra xâu nhập sau.

write[’Nhap ho ten thu nhat: ’];

write[’Nhap ho ten thu hai : ];

if length[a]>length[b] then write[a] else write[b];

- Tham số của các hàm và thủ tục chuẩn phải hợp lí, chẳng hạn không thể dùng Insert[sl,s2,I0] khi length[s2]length[b] then writeln[b] else if length[b]>length[a] then writeln[a] else begin writeln[a]; writeln[b];end;
readln
end.

cattien:

uses crt;
var a,b:string;
begin
clrscr;
write[‘Nhap xau ki tu thu nhat: ‘];readln[a];
write[‘Nhap xau ki tu thu hai: ‘];readln[b];
if length[a]>length[b] then writeln[b] else if length[b]>length[a] then writeln[a] else begin writeln[a]; writeln[b];end;
readln
end.

cattien:

uses crt;
var a,b:string;
begin
clrscr;
write[‘Nhap xau ki tu thu nhat: ‘];readln[a];
write[‘Nhap xau ki tu thu hai: ‘];readln[b];
if length[a]>length[b] then writeln[b] else if length[b]>length[a] then writeln[a] else begin writeln[a]; writeln[b];end;
readln
end.

Viết chương trình nhập ѵào 1 xâu từ bàn phím .a.In ra màn hình độ dài c̠ủa̠ xâu vừa nhập .b.Sử dụng xâu vừa nhập ở trên.Tiếp tục nhập từ bàn phím n k

Xem thêm : ...

Vừa rồi, seonhé.vn đã gửi tới các bạn chi tiết về chủ đề Viết chương trình nhập vào 1 xâu từ bàn phím .a. In ra màn hình độ dài của xâu vừa nhập .b. Sử dụng xâu vừa nhập ở trên. Tiếp tục nhập từ bàn phím n k nam 2022 ❤️️, hi vọng với thông tin hữu ích mà bài viết "Viết chương trình nhập vào 1 xâu từ bàn phím .a. In ra màn hình độ dài của xâu vừa nhập .b. Sử dụng xâu vừa nhập ở trên. Tiếp tục nhập từ bàn phím n k nam 2022" mang lại sẽ giúp các bạn trẻ quan tâm hơn về Viết chương trình nhập vào 1 xâu từ bàn phím .a. In ra màn hình độ dài của xâu vừa nhập .b. Sử dụng xâu vừa nhập ở trên. Tiếp tục nhập từ bàn phím n k nam 2022 [ ❤️️❤️️ ] hiện nay. Hãy cùng seonhé.vn phát triển thêm nhiều bài viết hay về Viết chương trình nhập vào 1 xâu từ bàn phím .a. In ra màn hình độ dài của xâu vừa nhập .b. Sử dụng xâu vừa nhập ở trên. Tiếp tục nhập từ bàn phím n k nam 2022 bạn nhé.

Sắp xếp dữ liệu là gì [Tin học - Lớp 7]

2 trả lời

Circle the best answer [Tin học - Lớp 2]

1 trả lời

Hệ điều hành là : [Tin học - Lớp 6]

2 trả lời

Nút lệnh bên thực hiện thao tác nào? [Tin học - Lớp 6]

2 trả lời

Câu lệnh pascal nào sau đây là hợp lệ? [Tin học - Lớp 8]

1 trả lời

Nút lệnh bên thực hiện thao tác nào [Tin học - Lớp 6]

2 trả lời

Giải Bài Tập Tin Học 11 – Bài tập và thực hành 5 giúp HS giải bài tập, giúp cho các em hình thành và phát triển năng lực sử dụng công nghệ thông tin và truyền thông:

Xem thêm các sách tham khảo liên quan:

  • Sách Giáo Viên Tin Học Lớp 11

1. Mục đích, yêu cầu

Làm quen với việc tìm kiếm, thay thế và biến đổi xâu.

2. Nội dung

a] Hãy chạy thử chương trình sau:

program vd2; uses crt; var i,x:byte; a,p:string; begin clrscr; write['nhap xau:']; readln[a]; x:=length[a]; p:=''; for i:=x downto 1 do p:=p+a[i]; if a=p then write['xau la palindrome'] else write['xau khong phai la palindrome']; readkey; end.

b] Hãy viết lại chương trình tên, trong đó không dùng biến xâu p.

Do xâu đảo ngược cũng chính là xâu viết xuôi nên

Xau[1]=Xau[length[xau]] Xau[2]=Xau[length[xau-1]] …..

Vậy ta có thể làm theo cách sau:

Sử dụng biến I để đếm xuôi rồi so sánh với xau[length[xau]-i] nếu khác nhau thì kết luận luôn không phải là palindrome. Lặp đến khi nào i> length[xau]-I +1[Vì duyệt tiếp chỉ là sự lặp lại]

program vd2; uses crt; var a:string; i:integer; p:boolean; begin clrscr; write['nhap xau:']; readln[a]; i:=1; p:=true; while [i0 then writeln[chr[ord['A']+i],':',gt[i]]; readkey; end.

Kết quả:

Trả lời:

Ta sẽ tìm vị trí mà từ ‘anh’ xuất hiện đầu tiên bằng hàm pos sau đó xóa từ ‘anh’ đi rồi chèn từ ’em’ vào.

Đến khi nào xâu ban đầu không còn từ ‘anh’ nữa thì dừng.

program vd2; uses crt; var a:string; vt:integer; begin clrscr; write['nhap xau:']; readln[a]; while pos['anh',a]>0 do begin vt:=pos['anh',a]; delete[a,vt,3]; insert['em',a,vt]; end; write[a]; readkey; end.

Video liên quan

Video liên quan

Chủ Đề