marcioe Posted November 6, 2017 Report Share Posted November 6, 2017 Olá a Todos, A situação é a Seguinte Imagina assim Uma string 11|54|92|78|41|13|64|38|00|04| preciso saber quais os numero não são ou sejam diferentes de 11|78|64|04| ou seja iria ler a primeira string e saber quais os numero não batem com a segunda string No caso o resultado seria 54|92|41|13|38|00| Quote Link to comment Share on other sites More sharing options...
Theotokos Posted November 6, 2017 Report Share Posted November 6, 2017 Tente com Hb_aToken() aV1 := Hb_aToken("11|54|92|78|41|13|64|38|00|04|","|") aV2 := Hb_aToken("11|78|64|04|","|") Ai vc compara os dois Vetores aV1 , aV2 cResultado := "" For n1 := 1 To len(aV1) if ASCAN(aV2,{|a| a = aV1[n1]) = 0 cResultado += aV1[n1]+"|" Endif Next n1 Quote Link to comment Share on other sites More sharing options...
sistem Posted November 7, 2017 Report Share Posted November 7, 2017 Function test() Local cAchou:="", cNaoAchou:="", A1, B1, A2, B2, x1, z1, lOk A1 := "11|54|92|78|41|13|64|38|00|04|" B1 := "11|78|64|04|" For x1=1 to Len(A1)/3 lOk := .f. A2 := Subs(A1,(x1*3)-2,2) For z1=1 to Len(B1)/3 B2 := Subs(B1,(z1*3)-2,2) If A2 = B2 cAchou = cAchou + B2+"|" lOk := .t. Endif Next If !lOk cNaoAchou = cNaoAchou + A2+"|" Endif Next ? cAchou ? cNaoAchou Return nil Quote Link to comment Share on other sites More sharing options...
marcioe Posted November 7, 2017 Author Report Share Posted November 7, 2017 resolvido amigos, obrigado. Quote Link to comment Share on other sites More sharing options...
marcioe Posted November 10, 2017 Author Report Share Posted November 10, 2017 Aproveitando dos amigos, Imaginem a string que vai de 00 a 99 e a segunda string 00|01|02|03|04|05|06|07|a08|09|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99| Preciso Saber a quantidade de vezes Agrupado por Numero (exemplo 00 - > 10| vezes, 01| - > 03 veses 36|44|16|81|12|03|50|67|85|40|01|03|07|26|20|88|64|35|24|12|13|14|95|43|47|07|77|76|40|16|10|12|14|18|30|81|51|15|21|01|99|67|60|43|40|15|45|12|70|16|02|04|11|16|31|24|08|12|10|12|00|58|05|30|14|35|45|44|73|03|24|30|43|79|06|25|34|03|14|38|00|83|17|30|70|40|12|07|71|42|92|09|47|78|14|44|07|04|02|20|03|08|36|31|55|50|60|46|02|07|00|03|09|33|55|12|91|24|69|83|05|23|51|14|50|03|00|83|79|48|00|03|08|14|17|23|48|50|83|51|03|12|27|39|45|48|58|66|72|96|07|11|16|18|40|42|51|73|88|52|03|16|17|20|33|36|46|63|68|94|50|66|33|17|56|12|03|81|00|46|28|14|47|94|03|22|98|10|19|25|02|07|10|13|16|32|36|37|54|58|09|12|68|19|58|59|32|14|00|30|34|16|50|39|14|00|19|55|90|13|03|19|27|87|93|96|21|07|13|22|03|23|34|42|46|50|52|56|82|12|48|12|02|86|82|01|20|99|07|34|38|00|12|67|96|36|00|61|03|08|07|99|14|15|84|08|11|45|29|41|03|09|12|15|29|33|48|52|58|72|53|35|11|97|40|12|14|25|30|09|03|57|11|48|49|17|74|12|23|18|09|17|14|20|80|32|48|58|38|07|25|16|42|17|00|09|83|99|26|14|93|78|64|03|59|55|16|35|71|67|14|19|69|61|00|96|07|85|36|56|69|73|09|03|50|54|49|64|59|79|24|32|38|03|51|66|33|20|96|77|55|88|12|95|46|67|08|23|75|13|00|54|55|33|43|58|75|25|26|12|69|73|34|54|50|03|09|00|19|51|12|15|28|30|38|46|50|24|84|86|11|16|81|05|13|11|69|25|15|83|10|20|36|45|16|21|27|08|11|29|16|21|32|48|50|62|68|70|11|20|69|49|90|76|89|88|71|12|62|27|47|58|12|90|37|88|96|19|70|69|00|21|43|68|16|97|20|55|71|90|79|03|04|44|79|35|83|71|19|56|00|03|08|09|19|27|33|44|53|73|17|20|37|44|97|04|57|63|87|14|00|22|33|44|66|66|16|16|41|57|06|10|20|15|30|12|04|19|60|70|08|14|22|28|32|44|56|68|71|83|03|05|15|22|37|48|61|71|79|99|46|49|93|58|69|04|55|16|52|18|00|02|07|19|79|81|09|11|09|35|04|07|19|24|32|55|65|39|46|60|03|15|23|34|37|43|54|65|73|86|49|67|33|28|12|65|04|25|02|44|31|08|12|52|74|96|55|60|72|80|03|10|19|33|39|56|15|64|72|78|33|26|56|94|85|56|74|20|42|07|72|92|03|97|40|01|88|51|10|06|06|10|99|00|03|79|13|32|49|47|03|09|10|13|19|24|41|46|50|73|07|17|27|37|47|57|67|77|87|97|25|32|42|40|50|07|27|84|61|64|00|03|09|17|21|32|50|54|59|79|08|17|07|55|64|88|22|75|11|09|81|79|95|59|32|12|24|55|49|05|29|44|49|98|12|09|64|90|69|21|61|50|55|66|98|00|03|43|56|83|14|55|71|89|28|05|66|36|44|98|04|08|16|20|36|45|68|80|88|99|06|14|27|30|40|45|54|15|65|72|13|16|18|21|23|28|44|46|68|88|19|18|03|29|10|05|13|41|09|32|03|00|05|69|83|00|79|50|76|33|07|27|38|44|00|00|99|69|31|73|10|12|20|21|24|25|33|89|50|65|24|48|43|35|33|39|70|12|36|67|09|14|20|24|36|40|57|83|60|96|21|01|12|04|19|63|05|27|35|93|79|02|93|12|50|40|21|97|32|63|17|11|81|12|05|50|20|70|00|99|05|07|09|10|19|20|39|51|59|79|66|88|33|19|17|77|99|02|22|07|03|02|33|00|17|19|37|38|94|95|88|14|98|05|86|39|32|36|50|49|03|21|32|44|57|63|62|31|13|24|03|03|50|83|00|37|79|23|51|48|69|20|14|29|99|75|10|09|32|36|05|14|23|43|48|50|69|79|83|00|03|10|19|50|24|27|36|65|70|99|18|39|49|73|98|44|35|13|16|63|03|23|45|54|00|55|29|31|25|52|07|09|13|25|40|55|65|77|00|98|50|45|00|19|09|69|03|39|76|24|16|21|50|61|61|73|73|86|62|51|51|50|62|99|05|14|06|19|73|59|49|69|18|44|00|20|90|66|12|17|14|19|34|72|51|77|81|97|93|87|03|13|33|34|52|57|62|66|83|99|05|13|16|18|22|33|44|58|72|98|97|94|66|69|44|45|09|33|07|31|17|37|71|54|08|51|20|54|12|00|66|40|71|96|12|36|52|10|84|91|03|11|20|34|40|55|60|64|75|94|14|20|72|61|97|82|36|86|17|43|23|54|43|95|16|99|79|69|19|18|02|12|13|19|38|49|55|68|76|91|19|36|16|37|44|57|62|77|81|99|03|11|17|25|31|49|69|82|73|95|01|02|12|19|37|38|49|18|48|00|74|33|00|48|51|96|18|24|07|09|69|00|03|50|85|33|43|08|44|21|33|25|28|29|98|00|14|83|13|33|03|03|17|31|54|51|58|79|85|97|06|18|20|44|50|66|43|78|94|14|23|57|76|28|19|56|07|22|87|69|73|79|40|55|98|03|23|25|86|93|43|87|66|09|37|28|06|02|14|10|04|16|22|41|20|36|31|66|27|45|00|03|24|44|50|49|51|69|79|96|12|23|40|64|67|20|56|97|06|26|02|03|10|11|52|20|50|23|26|56|00|98|33|19|05|65|40|69|45|14|98|44|64|71|12|88|73|37|19|85|02|16|36|29|51|73|59|32|69|41|73|94|45|89|55|60|02|07|98|51|04|01|02|12|19|37|38|49|18|48|87|99|24|03|56|82|43|00|92|45|64|34|42|12|54|63|37|27|72|67|63|24|45|55|85|20|18|08|03|37|36|11|07|44|99|00|77|65|88|67|75|26|79|14|32|15|83|18|84|02|03|32|33|45|59|63|73|83|84|00|12|24|36|44|54|66|70|82|89|92|01|06|08|15|18|19|24|44|50|70|09|19|29|39|49|59|69|79|89|99|77|35|27|83|41|21|22|23|24|20|00|70|69|99|36|08|01|19|47|72|08|13|10|24|33|50|59|84|97|99|01|08|19|20|36|47|65|70|99|00|04|08|11|23|32|72|56|97|99|51|79|80|90|35|05|08|06|24|71|19|05|11|22|35|31|51|98|18|55|63|05|22|26|62|68|94|33|90|99|00|48|60|33|56|29|13|17|71|86|86|23|56|30|44|47|17|20|76|89|84|95|57|93|97|53|73|37|35|39|59|08|86|27|80|93|54|09|40|15|57|78|19|34|37|66|27|18|05|09|93|00|19|34|24|44|93|69|77|37|54|10|20|18|36|40|70|80|90|50|60|29|34|37|42|43|51|53|65|72|93|30|10|17|28|84|02|24|42|40|94|01|10|19|20|40|60|45|65|75|91|39|40|44|19|00|99|87|34|56|55|33|13|84|24|97|32|59|04|19|28|63|57|11|15|64|25|26|76|98|28|47|11|19|13|60|84|06|73|27|36|00|33|59|91|92|01|02|50|20|21|02|25|45|74|76|52|61|85|54|35|01|09|19|18|23|24|35|45|70|87|06|09|10|28|58|67|69|00|20|42|34|47|96|59|08|42|50|76|43|79|06|09|13|30|47|23|58|43|60|04|02|19|25|33|46|56|72|77|88|96|38|40|35|34|18|32|68|41|52|86|44|17|22|30|52|69|88|90|96|70|93|34|85|87|17|19|51|77|97|81|69|72|86|71|73|36|21|33|74|32|02|10|19|20|31|36|47|87|99|70|04|09|11|19|23|27|38|58|72|84|01|10|18|19|23|29|35|45|70|99|15|25|42|61|10|17|27|00|19|50|13|55|59|62|67|78|85|23|27|00|22|33|59|68|20|56|34|21|95|09|22|45|00|54|71|60|50|80|70|90|32|34|37|62|64|54|77|78|00|92|72|76|86|87|90|64|67|06|19|24|86|78|63|98|52|38|89|76|96|54|10|21|98|28|02|77|64|42|26|30|09|10|18|77|88|67|29|65|33|99|09|17|19|23|33|45|49|69|75|65|01|09|19|36|45|50|64|70|87|99|69|99|29|22|79|50|66|00|20|05|04|06|19|24|26|32|45|52|70|73|11|27|29|26|94|06|67|84|06|57|75|85|78|92|25|62|58|53|23|46|17|36|23|60|73|37|85|27|35|30|19|20|21|22|26|27|29|30|33|34|78|99|59|76|15|00|21|06|10|67|00|97|72|68|11|40|50|81|25|36|11|40|90|68|00|33|25|73|02|35|00|51|71|36|27|37|44|56|23|97|09|19|53|59|38|66|00|79|52|90|79|53|27|00|84|15|19|66|10|42|54|48|68|78|69|79|89|90|39|08|08|15|26|41|73|99|98|31|32|55|02|05|08|11|27|29|33|68|72|72|00|33|44|55|66|88|77|89|34|67|31|49|95|43|10|34|68|18|86|45|46|24|21|77|99|79|80|61|88|01|20|00|74|68|31|13|01|92|20|34|99|00|69|79|64|04|19|33|70|55|02|05|19|20|21|69|56|59|74|63|55|72|45|69|95|98|52|20|58|22|30|00|10|15|18|59|17|49|73|55|08|01|19|66|77|44|22|23|33|88|58|52|45|19|41|36|10|72|09|89|09|17|28|39|45|57|64|68|85|92|13|93|62|38|11|46|70|51|69|66|63|35|11|27|36|56|48|43|30|18|54|36|54|73|42|73|80|94|17|56|42|33|15|72|36|19|64|23|45|22|19|20|23|32|50|55|54|81|82|99|36|72|09|69|47|21|02|11|51|25|89|24|79|23|39|34|22|06|37|47|01|45|44|19|98|86|99|73|09|08|57|75|17|85|59|15|79|87|56|58|06|11|19|21|36|54|59|63|80|81|95|97|29|32|70|38|40|50|83|52|00|61|75|28|04|30|51|19|33|39|42|58|34|28|25|19|60|11|09|00|09|04|13|21|56|10|79|26|58|32|40|36|06|46|91|96|71|74|93|97|22|32|45|54|58|52|51|77|37|20|18|94|31|11|09|30|70|90|00|59|19|33|00|25|74|42|24|83|15|54|27|34|13|25|43|96|79|65|51|05|95|50|86|39|89|36|58|79|32|85|10|30|50|33|60|71|98|18|79|80|81|93|94|37|89|44|53|31|61|36|02|08|17|18|13|21|29|36|47|63|08|23|10|11|96|69|26|21|47|80|54|31|51|33|22|27|61|56|77|71|13|74|27|01|18|80|79|99|43|24|56|86|49|54|64|20|90|17|59|44|44|68|60|43|63|23|13|88|08|30|54|76|62|42|00|45|72|05|57|56|11|24|27|90|00|59|68|19|05|59|65|44|54|49|33|86|75|64|37|57|38|79|42|19|27|76|67|72|24|83|00|79|76|33|95|50|37|19|76|59|52|72|09|42|91|35|19|88|69|13|01|20|33|36|54|60|09|58|77|19|32|02|56|59|78|39|32|79|06|37|32|02|56|59|96|86|38|37|15|34|02|06|09|11|23|52|61|65|66|72|08|20|23|25|31|45|50|60|70|00|00|06|36|40|32|52|84|56|48|90|02|10|15|39|46|50|66|83|96|98|02|09|19|20|32|49|29|79|59|22|05|17|21|29|35|42|45|59|64|68|45|93|69|94|50|60|86|19|21|25| Preciso que o resultado, seja um array mais ou menos assim Dezena Qtde de Vezes 00 10 01 04 02 01 03 50 Agradeço mais uma vez Quote Link to comment Share on other sites More sharing options...
sistem Posted November 13, 2017 Report Share Posted November 13, 2017 Function test() Local A1, A2, B1, B2, x1, z1, aVetor:=array(200) A1 := "00|01|02|03|04|05|06|07|08|09|10|11|12|13|14|15|16|17|18|19|20|21|22|23|24|25|26|27|28|29|30|31|32|33|34|35|36|37|38|39|40|41|42|43|44|45|46|47|48|49|50|51|52|53|54|55|56|57|58|59|60|61|62|63|64|65|66|67|68|69|70|71|72|73|74|75|76|77|78|79|80|81|82|83|84|85|86|87|88|89|90|91|92|93|94|95|96|97|98|99|" B1 := "36|44|16|81|12|03|50|67|85|40|01|03|07|26|20|88|64|35|24|12|13|14|95|43|47|07|77|76|40|16|10|12|14|18|30|81|51|15|21|01|99|67|60|43|40|15|45|12|70|16|02|04|11|16|31|24|08|12|10|12|00|58|05|30|14|35|45|44|73|03|24|30|43|79|06|25|34|03|14|38|00|83|17|30|70|40|12|07|71|42|92|09|47|78|14|44|07|04|02|20|03|08|36|31|55|50|60|46|02|07|00|03|09|33|55|12|91|24|69|83|05|23|51|14|50|03|00|83|79|48|00|03|08|14|17|23|48|50|83|51|03|12|27|39|45|48|58|66|72|96|07|11|16|18|40|42|51|73|88|52|03|16|17|20|33|36|46|63|68|94|50|66|33|17|56|12|03|81|00|46|28|14|47|94|03|22|98|10|19|25|02|07|10|13|16|32|36|37|54|58|09|12|68|19|58|59|32|14|00|30|34|16|50|39|14|00|19|55|90|13|03|19|27|87|93|96|21|07|13|22|03|23|34|42|46|50|52|56|82|12|48|12|02|86|82|01|20|99|07|34|38|00|12|67|96|36|00|61|03|08|07|99|14|15|84|08|11|45|29|41|03|09|12|15|29|33|48|52|58|72|53|35|11|97|40|12|14|25|30|09|03|57|11|48|49|17|74|12|23|18|09|17|14|20|80|32|48|58|38|07|25|16|42|17|00|09|83|99|26|14|93|78|64|03|59|55|16|35|71|67|14|19|69|61|00|96|07|85|36|56|69|73|09|03|50|54|49|64|59|79|24|32|38|03|51|66|33|20|96|77|55|88|12|95|46|67|08|23|75|13|00|54|55|33|43|58|75|25|26|12|69|73|34|54|50|03|09|00|19|51|12|15|28|30|38|46|50|24|84|86|11|16|81|05|13|11|69|25|15|83|10|20|36|45|16|21|27|08|11|29|16|21|32|48|50|62|68|70|11|20|69|49|90|76|89|88|71|12|62|27|47|58|12|90|37|88|96|19|70|69|00|21|43|68|16|97|20|55|71|90|79|03|04|44|79|35|83|71|19|56|00|03|08|09|19|27|33|44|53|73|17|20|37|44|97|04|57|63|87|14|00|22|33|44|66|66|16|16|41|57|06|10|20|15|30|12|04|19|60|70|08|14|22|28|32|44|56|68|71|83|03|05|15|22|37|48|61|71|79|99|46|49|93|58|69|04|55|16|52|18|00|02|07|19|79|81|09|11|09|35|04|07|19|24|32|55|65|39|46|60|03|15|23|34|37|43|54|65|73|86|49|67|33|28|12|65|04|25|02|44|31|08|12|52|74|96|55|60|72|80|03|10|19|33|39|56|15|64|72|78|33|26|56|94|85|56|74|20|42|07|72|92|03|97|40|01|88|51|10|06|06|10|99|00|03|79|13|32|49|47|03|09|10|13|19|24|41|46|50|73|07|17|27|37|47|57|67|77|87|97|25|32|42|40|50|07|27|84|61|64|00|03|09|17|21|32|50|54|59|79|08|17|07|55|64|88|22|75|11|09|81|79|95|59|32|12|24|55|49|05|29|44|49|98|12|09|64|90|69|21|61|50|55|66|98|00|03|43|56|83|14|55|71|89|28|05|66|36|44|98|04|08|16|20|36|45|68|80|88|99|06|14|27|30|40|45|54|15|65|72|13|16|18|21|23|28|44|46|68|88|19|18|03|29|10|05|13|41|09|32|03|00|05|69|83|00|79|50|76|33|07|27|38|44|00|00|99|69|31|73|10|12|20|21|24|25|33|89|50|65|24|48|43|35|33|39|70|12|36|67|09|14|20|24|36|40|57|83|60|96|21|01|12|04|19|63|05|27|35|93|79|02|93|12|50|40|21|97|32|63|17|11|81|12|05|50|20|70|00|99|05|07|09|10|19|20|39|51|59|79|66|88|33|19|17|77|99|02|22|07|03|02|33|00|17|19|37|38|94|95|88|14|98|05|86|39|32|36|50|49|03|21|32|44|57|63|62|31|13|24|03|03|50|83|00|37|79|23|51|48|69|20|14|29|99|75|10|09|32|36|05|14|23|43|48|50|69|79|83|00|03|10|19|50|24|27|36|65|70|99|18|39|49|73|98|44|35|13|16|63|03|23|45|54|00|55|29|31|25|52|07|09|13|25|40|55|65|77|00|98|50|45|00|19|09|69|03|39|76|24|16|21|50|61|61|73|73|86|62|51|51|50|62|99|05|14|06|19|73|59|49|69|18|44|00|20|90|66|12|17|14|19|34|72|51|77|81|97|93|87|03|13|33|34|52|57|62|66|83|99|05|13|16|18|22|33|44|58|72|98|97|94|66|69|44|45|09|33|07|31|17|37|71|54|08|51|20|54|12|00|66|40|71|96|12|36|52|10|84|91|03|11|20|34|40|55|60|64|75|94|14|20|72|61|97|82|36|86|17|43|23|54|43|95|16|99|79|69|19|18|02|12|13|19|38|49|55|68|76|91|19|36|16|37|44|57|62|77|81|99|03|11|17|25|31|49|69|82|73|95|01|02|12|19|37|38|49|18|48|00|74|33|00|48|51|96|18|24|07|09|69|00|03|50|85|33|43|08|44|21|33|25|28|29|98|00|14|83|13|33|03|03|17|31|54|51|58|79|85|97|06|18|20|44|50|66|43|78|94|14|23|57|76|28|19|56|07|22|87|69|73|79|40|55|98|03|23|25|86|93|43|87|66|09|37|28|06|02|14|10|04|16|22|41|20|36|31|66|27|45|00|03|24|44|50|49|51|69|79|96|12|23|40|64|67|20|56|97|06|26|02|03|10|11|52|20|50|23|26|56|00|98|33|19|05|65|40|69|45|14|98|44|64|71|12|88|73|37|19|85|02|16|36|29|51|73|59|32|69|41|73|94|45|89|55|60|02|07|98|51|04|01|02|12|19|37|38|49|18|48|87|99|24|03|56|82|43|00|92|45|64|34|42|12|54|63|37|27|72|67|63|24|45|55|85|20|18|08|03|37|36|11|07|44|99|00|77|65|88|67|75|26|79|14|32|15|83|18|84|02|03|32|33|45|59|63|73|83|84|00|12|24|36|44|54|66|70|82|89|92|01|06|08|15|18|19|24|44|50|70|09|19|29|39|49|59|69|79|89|99|77|35|27|83|41|21|22|23|24|20|00|70|69|99|36|08|01|19|47|72|08|13|10|24|33|50|59|84|97|99|01|08|19|20|36|47|65|70|99|00|04|08|11|23|32|72|56|97|99|51|79|80|90|35|05|08|06|24|71|19|05|11|22|35|31|51|98|18|55|63|05|22|26|62|68|94|33|90|99|00|48|60|33|56|29|13|17|71|86|86|23|56|30|44|47|17|20|76|89|84|95|57|93|97|53|73|37|35|39|59|08|86|27|80|93|54|09|40|15|57|78|19|34|37|66|27|18|05|09|93|00|19|34|24|44|93|69|77|37|54|10|20|18|36|40|70|80|90|50|60|29|34|37|42|43|51|53|65|72|93|30|10|17|28|84|02|24|42|40|94|01|10|19|20|40|60|45|65|75|91|39|40|44|19|00|99|87|34|56|55|33|13|84|24|97|32|59|04|19|28|63|57|11|15|64|25|26|76|98|28|47|11|19|13|60|84|06|73|27|36|00|33|59|91|92|01|02|50|20|21|02|25|45|74|76|52|61|85|54|35|01|09|19|18|23|24|35|45|70|87|06|09|10|28|58|67|69|00|20|42|34|47|96|59|08|42|50|76|43|79|06|09|13|30|47|23|58|43|60|04|02|19|25|33|46|56|72|77|88|96|38|40|35|34|18|32|68|41|52|86|44|17|22|30|52|69|88|90|96|70|93|34|85|87|17|19|51|77|97|81|69|72|86|71|73|36|21|33|74|32|02|10|19|20|31|36|47|87|99|70|04|09|11|19|23|27|38|58|72|84|01|10|18|19|23|29|35|45|70|99|15|25|42|61|10|17|27|00|19|50|13|55|59|62|67|78|85|23|27|00|22|33|59|68|20|56|34|21|95|09|22|45|00|54|71|60|50|80|70|90|32|34|37|62|64|54|77|78|00|92|72|76|86|87|90|64|67|06|19|24|86|78|63|98|52|38|89|76|96|54|10|21|98|28|02|77|64|42|26|30|09|10|18|77|88|67|29|65|33|99|09|17|19|23|33|45|49|69|75|65|01|09|19|36|45|50|64|70|87|99|69|99|29|22|79|50|66|00|20|05|04|06|19|24|26|32|45|52|70|73|11|27|29|26|94|06|67|84|06|57|75|85|78|92|25|62|58|53|23|46|17|36|23|60|73|37|85|27|35|30|19|20|21|22|26|27|29|30|33|34|78|99|59|76|15|00|21|06|10|67|00|97|72|68|11|40|50|81|25|36|11|40|90|68|00|33|25|73|02|35|00|51|71|36|27|37|44|56|23|97|09|19|53|59|38|66|00|79|52|90|79|53|27|00|84|15|19|66|10|42|54|48|68|78|69|79|89|90|39|08|08|15|26|41|73|99|98|31|32|55|02|05|08|11|27|29|33|68|72|72|00|33|44|55|66|88|77|89|34|67|31|49|95|43|10|34|68|18|86|45|46|24|21|77|99|79|80|61|88|01|20|00|74|68|31|13|01|92|20|34|99|00|69|79|64|04|19|33|70|55|02|05|19|20|21|69|56|59|74|63|55|72|45|69|95|98|52|20|58|22|30|00|10|15|18|59|17|49|73|55|08|01|19|66|77|44|22|23|33|88|58|52|45|19|41|36|10|72|09|89|09|17|28|39|45|57|64|68|85|92|13|93|62|38|11|46|70|51|69|66|63|35|11|27|36|56|48|43|30|18|54|36|54|73|42|73|80|94|17|56|42|33|15|72|36|19|64|23|45|22|19|20|23|32|50|55|54|81|82|99|36|72|09|69|47|21|02|11|51|25|89|24|79|23|39|34|22|06|37|47|01|45|44|19|98|86|99|73|09|08|57|75|17|85|59|15|79|87|56|58|06|11|19|21|36|54|59|63|80|81|95|97|29|32|70|38|40|50|83|52|00|61|75|28|04|30|51|19|33|39|42|58|34|28|25|19|60|11|09|00|09|04|13|21|56|10|79|26|58|32|40|36|06|46|91|96|71|74|93|97|22|32|45|54|58|52|51|77|37|20|18|94|31|11|09|30|70|90|00|59|19|33|00|25|74|42|24|83|15|54|27|34|13|25|43|96|79|65|51|05|95|50|86|39|89|36|58|79|32|85|10|30|50|33|60|71|98|18|79|80|81|93|94|37|89|44|53|31|61|36|02|08|17|18|13|21|29|36|47|63|08|23|10|11|96|69|26|21|47|80|54|31|51|33|22|27|61|56|77|71|13|74|27|01|18|80|79|99|43|24|56|86|49|54|64|20|90|17|59|44|44|68|60|43|63|23|13|88|08|30|54|76|62|42|00|45|72|05|57|56|11|24|27|90|00|59|68|19|05|59|65|44|54|49|33|86|75|64|37|57|38|79|42|19|27|76|67|72|24|83|00|79|76|33|95|50|37|19|76|59|52|72|09|42|91|35|19|88|69|13|01|20|33|36|54|60|09|58|77|19|32|02|56|59|78|39|32|79|06|37|32|02|56|59|96|86|38|37|15|34|02|06|09|11|23|52|61|65|66|72|08|20|23|25|31|45|50|60|70|00|00|06|36|40|32|52|84|56|48|90|02|10|15|39|46|50|66|83|96|98|02|09|19|20|32|49|29|79|59|22|05|17|21|29|35|42|45|59|64|68|45|93|69|94|50|60|86|19|21|25|" For x1=1 to Len(A1)/3 A2 := Subs(A1,(x1*3)-2,2) aVetor[Val("1"+A2)]=0 For z1=1 to Len(B1)/3 B2 := Subs(B1,(z1*3)-2,2) If A2 = B2 aVetor[Val("1"+A2)]++ Endif Next Next For x1=1 to Len(A1)/3 A2 := Subs(A1,(x1*3)-2,2) If aVetor[Val("1"+A2)] > 0 ? A2+" = "+str(aVetor[Val("1"+A2)])+" vezes" Endif Next Return nil é para contar quantos do conjunto A1 esta contido no conjunto B1 (agrupando)? uma curiosidade para que o amigo usa isto? Quote Link to comment Share on other sites More sharing options...
marcioe Posted November 13, 2017 Author Report Share Posted November 13, 2017 Nesse caso é um sistema de conferencia de Bolão. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.