PTIT121I spoj PTIT - Lặp lại các kí tự

Nguồn đề bài: http://www.spoj.com/PTIT12R1/problems/PTIT121I/

Nội dung bài viết

1. Đề bài PTIT121I spoj
2. Code tham khảo PTIT121I spoj PTIT

1. Đề bài PTIT121I spoj

Với một xâu ký tự S, và một số nguyên R, hãy tạo ra một xâu T bằng cách mỗi ký tự trong S được lặp lại R lần. Các ký tự trong S có thể nằm trong dãy:

0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ$%*+-./:

Input

Dòng 1 ghi số bộ test (không quá 1000)
Mỗi bộ test gồm số thứ tự, một dấu cách, tiếp theo là số 1<=R<=8, một dấu cách, rồi đến xâu ký tự S (không quá 20 ký tự).

Output

Với mỗi bộ test ghi trên một dòng số thứ tự bộ test, một dấu cách rồi đến xâu T.

Example

Input:
2

1 3 ABC
2 5 /HTP

Output:
1 AAABBBCCC

2 /////HHHHHTTTTTPPPPP

2. Code tham khảo PTIT121I spoj PTIT

const   fi='';
type
        data=integer;
var
        f:text;
        test,i,r,tmp:data;
        s:string;

procedure xuli;
var     i,j:data;
begin
        for i:=2 to length(s) do
                for j:=1 to r do
                        write(s[i]);
        writeln;
end;

begin
        assign(f,fi); reset(f);
        readln(f,test);
        for i:=1 to test do
                begin
                        read(f,tmp);
                        read(f,r);
                        readln(f,s);
                        write(i,' ');
                        xuli;
                end;
        close(f);
end.

const fi='';

type

data=integer;

var

f:text;

test,i,r,tmp:data;

s:string;

procedure xuli;

var i,j:data;

begin

for i:=2 to length(s) do

for j:=1 to r do

write(s[i]);

writeln;

end;

begin

assign(f,fi); reset(f);

readln(f,test);

for i:=1 to test do

begin

read(f,tmp);

read(f,r);

readln(f,s);

write(i,' ');

xuli;

end;

close(f);

end.

PTIT121I spoj PTIT – Lặp lại các kí tự

1. Đề bài PTIT121I spoj

Input

Output

Example

2. Code tham khảo PTIT121I spoj PTIT

Bài viết liên quan

2 thoughts on “PTIT121I spoj PTIT – Lặp lại các kí tự”

Trả lời Hủy