Pa kako ne znas. Imas samo par redova bez puno filozofiranja.
Code:
const
r: string = '12345678618327453258647114862573315762481835247651638
24774283615674253818426751337526841174685235472381687654321';
t: array[1..8] of string = ('tim1','tim2','tim3','tim4','tim5','tim6','tim7','tim8');
var i,j: integer;
begin
for i := 0 to 13 do
begin
writeln;
writeln('kolo: ',i+1);
for j := 1 to 4 do
writeln(t[ord(r[i*8+j*2-1])-ord('0')],'-',t[ord(r[i*8+j*2])-ord('0')]);
end;
end.
Pozdrav