Як трэба чытаць гэты верш: гучна і пафасна ці ўдумліва і разважліва? Падрыхтуйцеся да выразнага чытання твора. Танк. Шчасце

2)program 2;
var
k:integer;    
tmp:real;    
b:string;    
c:string;    
i:integer;
begin     
 k:=0; i:=0; tmp:=0;     
 write('Введите k:');     
read(k);     
repeat           
tmp:=exp(i*ln(10));           
str(tmp:0:0, c);           
b:=b+c;           
i:=i+1;     
until length(b) >= k;     
c:=copy(b, k, 1);     
 writeln(b);     
writeln('k-я цифра:', c);     
readln(k);
end.