Trang chủ Tin Học Lớp 10 Bài 4. (4.0 điểm) Shifting Letters Để bảo mật dữ...

Bài 4. (4.0 điểm) Shifting Letters Để bảo mật dữ liệu công ty ABC đưa ra quy tắc mã hóa như sau: - Cho trước một chuỗi s các chữ cái tiếng Anh viết thường và m

Câu hỏi :

Bài 4. (4.0 điểm) Shifting Letters

Để bảo mật dữ liệu công ty ABC đưa ra quy tắc mã hóa như sau:

- Cho trước một chuỗi s các chữ cái tiếng Anh viết thường và một mảng số nguyên shifts có cùng độ dài.

- Mỗi bước dịch chuyển một chữ cái trong bảng chữ cái ta được một chữ cái tiếp theo trong bảng chữ cái (Các chữ cái được xếp trên một vòng tròn theo thứ tự bảng chữ cái)

- Với mỗi shifts[i] = x, ta thay đổi i+1 các chữ cái đầu tiên của s, đúng x bước dịch chuyển.

Trả lại chuỗi cuối cùng sau khi thực hiện quy tắc mã hóa trên cho tất cả các kí tự có trong s

Dữ liệu: Đọc từ file văn bản shifting.inp gồm hai dòng, dòng thứ nhất ghi chuỗi s, s chỉ gồm các chữ cái tiếng anh viết thường. Dòng thứ hai ghi mảng số nguyên shifts mỗi số cách nhau một dấu cách.

Kết quả: Ghi vào file văn bản shifting.out kết quả sau khi thực hiện mã hóa chuỗi s.

 

 

Ví dụ:

Shifting.inp

Shifting.out

Giải thích

abc

3 5 9

rpl

- Sau khi dịch chuyển 1 chữ cái đầu tiên của s bằng 3, chúng ta có "dbc".

- Sau khi chuyển 2 chữ cái đầu tiên của s đi 5, chúng ta có "igc".

- Sau khi chuyển 3 chữ cái đầu tiên của s cho 9, chúng ta có "rpl", câu trả lời

 

Lời giải 1 :

Mình dùng nnlt pascal
program shifting;
var s:AnsiString; c,x:array[1..1000000] of int64; i:longint; y:int64;
//Bài này mình chuyển từng kí tự sang mã ascii rồi tính toán
//Sau đó chuyển lại về mã ascii, mong bạn tìm hiểu.
//Mình cũng dùng kĩ thuật mảng cộng dồn
begin
assign(input,'shifting.inp'); reset(input);

assign(output,'shifting.out'); rewrite(output);

readln(s);

for i:=1 to length(s) do read(x[i]);

readln;

c[length(s)] := x[length(s)];

for i:=length(s)-1 downto 1 do
begin
c[i] := c[i+1] + x[i];

end;

for i:=1 to length(s) do

begin
y := ord(s[i]);
y:=y+c[i];

if y > 122 then y:=(y mod 122) + 122;

if y > 122 then y:=y-26;

s[i] := chr(y);

end;

writeln(s);
end.

image

Bạn có biết?

Tin học là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng. Tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin. Hãy tận dụng sức mạnh của tin học để giải quyết các vấn đề và sáng tạo ra những giải pháp mới!

Nguồn :

Wikipedia - Bách khoa toàn thư

Tâm sự lớp 10

Lớp 10 - Năm đầu tiên ở cấp trung học phổ thông, chúng ta sẽ có nhiều bạn bè mới đến từ những nơi khác nhau. Ngôi trường mới, xa nhà hơn, mở ra một thế giới mới với nhiều điều thú vị. Hãy mở lòng đón nhận và tận hưởng những trải nghiệm mới!

Nguồn :

sưu tập

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK