fork download
  1. program antivirus;
  2.  
  3. var
  4. M, N1, N2, N3, N4, T, p1, p2, p3, p4, test, i, id : LongInt;
  5. F1, F2, F3, F4, virus : AnsiString;
  6. corrispondenza : boolean;
  7. A :array [2..4] of Longint;
  8. F :array[1..4] of AnsiString;
  9. begin
  10. {
  11.   decommenta le due righe seguenti se vuoi leggere/scrivere da file
  12.   assign(input, 'input.txt'); reset(input);
  13.   assign(output, 'output.txt'); rewrite(output);
  14. }
  15.  
  16. ReadLn(T);
  17. for test:=1 to T do begin
  18. ReadLn();
  19. ReadLn(N1, N2, N3, N4);
  20.  
  21. ReadLn(M);
  22.  
  23. for i:=1 to 4 do A[i]:=0;
  24.  
  25. for i:=1 to 4 do ReadLn(F[i]);
  26.  
  27. for p1:= 1 to N1-M+1 do
  28. begin
  29. virus:=Copy(F[1],p1,M);
  30. for i:=2 to 4 do A[i]:=Pos(virus,F[i]);
  31. corrispondenza:=true;
  32. for i:= 2 to 4 do if A[i]=0 then corrispondenza:= false;
  33. if corrispondenza=true then
  34. begin
  35. for i:= 1 to 4 do begin p2:=A[2]; p3:=A[3]; p4:=A[4]; end;
  36. Write('Case #', test, ': ');
  37. WriteLn(p1-1, ' ', p2-1, ' ', p3-1, ' ', p4-1);
  38. break;
  39. end;
  40. end;
  41.  
  42. end;
  43. end.
  44.  
Success #stdin #stdout 0.01s 5288KB
stdin
12

6 8 7 10
2
bpbqbq
pbpbpbpd
pbdppqd
qpbqdbpbbb

10 15 10 10
6
gqtfsnyejh
ivcfedvqsnyejhy
lhssnyejhm
snyejhzozm

88 83 71 67
5
dbybbdbdqbydddydbybddbbddydbdbqbddbdbbddbdkdqbbdbbddbdbbvbbddbddbddbbdhbbbdbyddkdvdbdbbd
bbbddbbdybdqdbbbydyydbdbbkddbbddbydbddbbkbybbbdqdrdbdbddbbbdddbqbbyddbbddbbdbdbbbdd
bbdydddbdbbyddbdydbbdybbdbbrdddbqdbdbbcqdbdbdddddbbbbbdbbbdbbbdbkdbdbbb
dbbddbbybbdbdddbdhbbbbbbdbdddbbqddbdbbddddddbqbdbdbdddddbbdbddbdbbb

95 93 60 57
15
qdmbyinogragenlmizkydwgbgjjtogplmccebasmqnnhdtqhuztvilpomrpeflapptuatxfdijqzcrcohnldvbapoqbxkww
yazmfewhazbsthwegkghcbwdinspqqljfxriwapvzsxnhfvuaqqjaeqyntdjmkbasmqnnhdtqhuztbfynospdpltsvlib
whrcpvzajvobasmqnnhdtqhuztdxmptihzqanixnlszoquuhosjpkeprnauy
kwmnnsvjqhsldzsdwallermvalbvxafbasmqnnhdtqhuztvqfqjrdcjks

68 91 79 51
6
qppppqppppqqpqqppppqpqppqpqpqqppqqqxqpcpqpppqpqqcqqqpqqqpppppqqqqcpp
qqpppqqpqpqpppppqppppppqqpqpppqqpqpppqpqpppppqqqpqqqpqpqqqqcpqqqpqpqqqqqqqqppppppqpppqppppp
ppqppqpcqqqqpppqqcpqqpqpqqppqqqqpqqxppqpqqpqpqppppqppqppqppqpqqpxqqqqqpqqpqqppp
pppqpcpqpqqqqqppqqqqqpcppqqppqqqppqqqpcqpqpqqqppqqp

85 74 85 61
11
bbbddbbbbdbdbddbbbdddddddbdbddbdbdbbbbbbbbbdddbbbddbbddbdbdbdddbbbbddbddbdbddbddbddbd
dbdbbbdbdbbbddbbdbbddbdbbbbdbbdbddbdbbdbbddbdbbddbbdbbdbdddbddbdbddbdddbbb
bdbddddbbdddbdbbbdbddbbbddddbbbddbbdddbddbdbddbdbbbbdbbbbdbdbbdbddbdddbbddbddbbdbdbdd
bbbddbdbbdbdddbdddddbbdddbbdbdbddbdbddbdddbdbdbddbbbbdddddbdd

81 88 54 79
14
ppqpqpqpppqpppppqqqpppqppppppqpqqqqqppppqqppqqpqppqqppqpqqqqppqqqqppqpqqpqpnqqpqq
pqppqpqppppqqqqppqpqqpqpppqqpppqpqqpqqqpqppqqqpqppppppqpqppppqqqpqqqqpqpqqqqqpqqpqqppppq
qqqqqpppqqpqqqqppqpqqpqppppqppppqpppqpppqpqqpqqppqpppq
ppppqppqqqqppqpqqpqppqqqqppqqqqqpppqpqpqpppqpqpqqqpqpqqqppqppqqpqqpqpqqqqpqpqpq

94 88 98 52
5
pqhqpqhqpqpqhqpphppqppqqqqppqppphpqqqppqqqppppqppqqpqpqpqppppppqqqpppqqpqpppqqpppppqqqqppqqqqq
pppppppphqppqqpqpppqqqqpqpqhqqpqpqqqqppqqqpqpqqpmcqpqpqqqppqqpqqpqppqqqpphpqpppqqpqqpppp
qqqpqqppqqpqpqqppqpoqqppqqqpqpqpopppqqpppqqpqqpqphppqqpqqpppqpqqpqpqhqqpqqpppqppppppqpqqpqqhpqpppp
qqqpqqphppqpqqqhqpqpqopqpqpqpqqqqqhppqpqpqqqqphqqpqq

80 63 88 93
12
ptihbtpgoddugiepzhnfhomdtkucxilrsdydfapxnzyomrjdqinspnnwmdpsifivtzhxgzimfwpehuez
rxhkeebeiwlskgclydrylvxowoczozadilrsdydfapxnxnvvcjzrqfrwshyhzfu
gpqrywutukqqutbzuqnutdudkdcxonyfigtoahxtpgnzxxilrsdydfapxnqfluxvcknbkijsehzcogeljpssigiq
eizdamdiqetnmilbdaiygqnqzvrvovtizezfaifqmewnkhfilrsdydfapxnszpnhlxkatnyjirsumolryyljdpjjeoons

86 66 90 51
15
bdbdbbbdbdbbddbdbbbbbdbbbdddbdbbbddbddbdbbddddbdbdddbbdbddddbbdbdbbdbbbdbbdbddbdbdbbdd
dbbdbddddbdddbbddbdbbdbddbdbbdbbbdbbdbddbbbdbbbddddbbbbdddbdbbbdbb
dbbbbbdbbddbbbdddddbdddbbdbbddddbbdddbbbbdddbdbddddddbdddbbdbbbdbbdbddbddbbbbddbbbdbdbdddb
dbbbddbbbdbbdbbbdbbdbddbbdbbdbddddbbbddddddbdddbddb

72 51 54 78
5
qpqpdqdddqpqdpbqdqppbppqbpdbdpdbddbbddqddqqpqpqdbpddqbdddddqpbddbbpqbqdd
dddbddpdbqdbppqbpdqpdpppbqdpqbdbbdpdppqqbpppqbqdddp
pbqpbddppdqpdqbbdbbpddqdddqqqbddqqppqbqdqddqpqpqbddddb
pbdpqddbqppdddqbbpbpqdqdqdqdqqpddbdbbpdpdbpqpppdpqbqdqbbdpbdqqqqpdbqddpbdppppq

68 96 82 86
7
bbababbaabbbbabbbbbbbabaaaabbabaabbabbobababaaaabbbaabbbaababbaaabbb
bbabbbabbababbbaaaabbbbbabababbaabbaababaaabbbbaaababaaabbbbaabbaabbababbaabbbbaaaaabbbbbbabbaba
babaaabbbbaaabbbaaobbbbabababbbbaabbbbbaababaaabababbbbabbbbbaabbbaaaabababbabaabb
abbabbaaaaaabaaaaabbaabaabaaababbabbabbboaabbbbaaabbaaabbaaabbabababwbaabbababbbabaaba


stdout
Case #1: 1 0 0 1
Case #2: 4 8 3 0
Case #3: 33 20 6 33
Case #4: 36 62 11 31
Case #5: 24 51 20 39
Case #6: 68 58 37 29
Case #7: 61 10 10 6
Case #8: 7 22 9 16
Case #9: 29 32 46 47
Case #10: 64 26 56 9
Case #11: 66 43 35 48
Case #12: 7 41 4 41