program self3;
var 
 a:array[1..10000] of char; i:word;
function  M(k:byte):boolean; 
 begin M:=(a[i]=chr(33)) and (a[i+1]=chr(ord('0')+k)) end;
procedure P(b:byte); begin a[i]:=chr(b); inc(i) end;
procedure G(k:byte); begin repeat dec(i) until M(k) end;
procedure C; begin write(a[i]); inc(i) end;
procedure W; 
 begin 
  write(' P(',ord(a[i]):3,');'); inc(i);
  if (i mod 10) = 0 then writeln;
 end;
begin
 i:=0;
 P( 33); P( 48); P( 10); P(112); P(114); P(111); P(103); P(114); P( 97); P(109);
 P( 32); P(115); P(101); P(108); P(102); P( 51); P( 59); P( 10); P(118); P( 97);
 P(114); P( 32); P( 10); P( 32); P( 97); P( 58); P( 97); P(114); P(114); P( 97);
 P(121); P( 91); P( 49); P( 46); P( 46); P( 49); P( 48); P( 48); P( 48); P( 48);
 P( 93); P( 32); P(111); P(102); P( 32); P( 99); P(104); P( 97); P(114); P( 59);
 P( 32); P(105); P( 58); P(119); P(111); P(114); P(100); P( 59); P( 10); P(102);
 P(117); P(110); P( 99); P(116); P(105); P(111); P(110); P( 32); P( 32); P( 77);
 P( 40); P(107); P( 58); P( 98); P(121); P(116); P(101); P( 41); P( 58); P( 98);
 P(111); P(111); P(108); P(101); P( 97); P(110); P( 59); P( 32); P( 10); P( 32);
 P( 98); P(101); P(103); P(105); P(110); P( 32); P( 77); P( 58); P( 61); P( 40);
 P( 97); P( 91); P(105); P( 93); P( 61); P( 99); P(104); P(114); P( 40); P( 51);
 P( 51); P( 41); P( 41); P( 32); P( 97); P(110); P(100); P( 32); P( 40); P( 97);
 P( 91); P(105); P( 43); P( 49); P( 93); P( 61); P( 99); P(104); P(114); P( 40);
 P(111); P(114); P(100); P( 40); P( 39); P( 48); P( 39); P( 41); P( 43); P(107);
 P( 41); P( 41); P( 32); P(101); P(110); P(100); P( 59); P( 10); P(112); P(114);
 P(111); P( 99); P(101); P(100); P(117); P(114); P(101); P( 32); P( 80); P( 40);
 P( 98); P( 58); P( 98); P(121); P(116); P(101); P( 41); P( 59); P( 32); P( 98);
 P(101); P(103); P(105); P(110); P( 32); P( 97); P( 91); P(105); P( 93); P( 58);
 P( 61); P( 99); P(104); P(114); P( 40); P( 98); P( 41); P( 59); P( 32); P(105);
 P(110); P( 99); P( 40); P(105); P( 41); P( 32); P(101); P(110); P(100); P( 59);
 P( 10); P(112); P(114); P(111); P( 99); P(101); P(100); P(117); P(114); P(101);
 P( 32); P( 71); P( 40); P(107); P( 58); P( 98); P(121); P(116); P(101); P( 41);
 P( 59); P( 32); P( 98); P(101); P(103); P(105); P(110); P( 32); P(114); P(101);
 P(112); P(101); P( 97); P(116); P( 32); P(100); P(101); P( 99); P( 40); P(105);
 P( 41); P( 32); P(117); P(110); P(116); P(105); P(108); P( 32); P( 77); P( 40);
 P(107); P( 41); P( 32); P(101); P(110); P(100); P( 59); P( 10); P(112); P(114);
 P(111); P( 99); P(101); P(100); P(117); P(114); P(101); P( 32); P( 67); P( 59);
 P( 32); P( 98); P(101); P(103); P(105); P(110); P( 32); P(119); P(114); P(105);
 P(116); P(101); P( 40); P( 97); P( 91); P(105); P( 93); P( 41); P( 59); P( 32);
 P(105); P(110); P( 99); P( 40); P(105); P( 41); P( 32); P(101); P(110); P(100);
 P( 59); P( 10); P(112); P(114); P(111); P( 99); P(101); P(100); P(117); P(114);
 P(101); P( 32); P( 87); P( 59); P( 32); P( 10); P( 32); P( 98); P(101); P(103);
 P(105); P(110); P( 32); P( 10); P( 32); P( 32); P(119); P(114); P(105); P(116);
 P(101); P( 40); P( 39); P( 32); P( 80); P( 40); P( 39); P( 44); P(111); P(114);
 P(100); P( 40); P( 97); P( 91); P(105); P( 93); P( 41); P( 58); P( 51); P( 44);
 P( 39); P( 41); P( 59); P( 39); P( 41); P( 59); P( 32); P(105); P(110); P( 99);
 P( 40); P(105); P( 41); P( 59); P( 10); P( 32); P( 32); P(105); P(102); P( 32);
 P( 40); P(105); P( 32); P(109); P(111); P(100); P( 32); P( 49); P( 48); P( 41);
 P( 32); P( 61); P( 32); P( 48); P( 32); P(116); P(104); P(101); P(110); P( 32);
 P(119); P(114); P(105); P(116); P(101); P(108); P(110); P( 59); P( 10); P( 32);
 P(101); P(110); P(100); P( 59); P( 10); P( 98); P(101); P(103); P(105); P(110);
 P( 10); P( 32); P(105); P( 58); P( 61); P( 48); P( 59); P( 10); P( 33); P( 49);
 P( 10); P( 32); P( 71); P( 40); P( 48); P( 41); P( 59); P( 10); P( 32); P(105);
 P(110); P( 99); P( 40); P(105); P( 41); P( 59); P( 32); P(105); P(110); P( 99);
 P( 40); P(105); P( 41); P( 59); P( 10); P( 32); P(114); P(101); P(112); P(101);
 P( 97); P(116); P( 32); P( 67); P( 32); P(117); P(110); P(116); P(105); P(108);
 P( 32); P( 77); P( 40); P( 49); P( 41); P( 59); P( 10); P( 32); P( 71); P( 40);
 P( 48); P( 41); P( 59); P( 10); P( 32); P(114); P(101); P(112); P(101); P( 97);
 P(116); P( 32); P( 87); P( 32); P(117); P(110); P(116); P(105); P(108); P( 32);
 P( 77); P( 40); P( 50); P( 41); P( 59); P( 10); P( 32); P( 87); P( 59); P( 32);
 P( 87); P( 59); P( 10); P( 32); P( 71); P( 40); P( 49); P( 41); P( 59); P( 10);
 P( 32); P(105); P(110); P( 99); P( 40); P(105); P( 41); P( 59); P( 32); P(105);
 P(110); P( 99); P( 40); P(105); P( 41); P( 59); P( 10); P( 32); P(114); P(101);
 P(112); P(101); P( 97); P(116); P( 32); P( 67); P( 32); P(117); P(110); P(116);
 P(105); P(108); P( 32); P( 77); P( 40); P( 50); P( 41); P( 59); P( 10); P( 32);
 P(123); P( 32); P( 68); P(111); P( 32); P(115); P(111); P(109); P(101); P(116);
 P(104); P(105); P(110); P(103); P( 32); P(101); P(108); P(115); P(101); P( 32);
 P(104); P(101); P(114); P(101); P( 32); P(125); P( 10); P(101); P(110); P(100);
 P( 46); P( 10); P( 33); P( 50);
 G(0);
 inc(i); inc(i);
 repeat C until M(1);
 G(0);
 repeat W until M(2);
 W; W;
 G(1);
 inc(i); inc(i);
 repeat C until M(2);
 { Do something else here }
end.