by @Juan Manuel Gonzalez Ospina Fork
{"functions":[{"rawId":"id_b9ff5b96_7f78_43a2_84b2_d6950f61b14b","tpe":"Integer","name":"cuenta","statements":[{"@type":"Begin","id":"id_329e2981_ced0_4975_b09b_68cc47cb8fa1"},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"c","lengthValue2":"5","id":"id_df21b0df_8ecf_4233_a392_4d5181323048","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"t","lengthValue2":"5","id":"id_a2b6172a_91f6_496e_892c_e604da977e4c","initValue":null},{"@type":"Assign","name":"c","id":"id_a6cc60dd_28f4_4cca_92dc_8d04eee011a1","value":"0"},{"@type":"Assign","name":"t","id":"id_ff2e6acd_514a_4858_b2ca_38a9e8bc99ab","value":"x"},{"condition":"t > 0","@type":"While","id":"id_9b794fb5_0c85_4df0_bc88_81db78cef67f","body":{"statements":[{"falseBlock":{"statements":[],"id":"id_39d11553_5e6a_46a1_81f1_971fb0022540"},"trueBlock":{"statements":[{"@type":"Assign","name":"c","id":"id_66ac4287_a779_4afd_9e6c_694c68cae19d","value":"c + 1"}],"id":"id_41196132_4f8e_474c_91ef_8504d7ab70f5"},"condition":"t % 10 == d","@type":"If","id":"id_75e7af80_b20f_4756_9162_bbc7398e76cb"},{"@type":"Assign","name":"t","id":"id_8442df97_69b5_482b_bcb9_fc7cf4545a16","value":"t / 10"}],"id":"id_b9e05b63_c51b_47c9_a163_56cb5dcf7b9b"}},{"@type":"Return","id":"id_29f7970d_c500_49df_b2fb_11f64a255a21","maybeValue":"c"}],"parameters":[{"tpe":"Integer","name":"x","id":"f55c43ee-30d3-4e53-a082-2e3d822d5eb8"},{"tpe":"Integer","name":"d","id":"9822b7d6-18d6-438c-9124-040d3a724ae7"}]},{"rawId":"id_3dcc0e8d_d6dd_4ed1_a41a_48c793a10b5c","tpe":"Boolean","name":"mismos","statements":[{"@type":"Begin","id":"id_4226df50_ecc5_465e_83bd_a25d519f5bb9"},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"d","lengthValue2":"5","id":"id_fce728df_64d1_48eb_8521_c31281a121da","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"cN","lengthValue2":"5","id":"id_2eec50ee_b42f_46ec_b0af_340db07761e7","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"cF","lengthValue2":"5","id":"id_31885db6_3f2f_4086_9d7e_64721f872fb1","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Boolean","name":"iguales","lengthValue2":"5","id":"id_3a01460d_52c4_43d1_a1df_5f87f97bd76e","initValue":null},{"@type":"Assign","name":"iguales","id":"id_0203b21f_1cc2_421f_b86b_838b19f00bcf","value":"true"},{"@type":"Assign","name":"d","id":"id_6e7a892c_c120_4821_9b28_b3b77b162669","value":"0"},{"condition":"d <= 9 && iguales","@type":"While","id":"id_c74f2ecd_db38_46d3_bc31_5e48cb3c45e5","body":{"statements":[{"@type":"Assign","name":"cN","id":"id_cdf793fd_593d_4c8a_be65_018739f6dd1c","value":"cuenta(N, d)"},{"@type":"Assign","name":"cF","id":"id_77e7762b_b560_408f_96b9_2e8d992ca5d0","value":"cuenta(A, d) + cuenta(B, d)"},{"falseBlock":{"statements":[],"id":"id_72d95c84_1ae9_4598_8b7a_dc9c83bfa244"},"trueBlock":{"statements":[{"@type":"Assign","name":"iguales","id":"id_c9fec203_b916_4ef3_a230_8e6a5301e52a","value":"false"}],"id":"id_239ac720_e2b2_41a1_b19c_af757cbb62c6"},"condition":"cN != cF","@type":"If","id":"id_c2a099ca_b458_4136_a539_072ec2f7be3a"},{"@type":"Assign","name":"d","id":"id_0290644d_f6c4_4736_b07d_bfbdd95c1fbe","value":"d+1"}],"id":"id_a1e81b48_349f_4d11_aaf1_25fb7670892f"}},{"@type":"Return","id":"id_bf8708d6_719e_4f22_bda4_18bafd5095cc","maybeValue":"iguales"}],"parameters":[{"tpe":"Integer","name":"N","id":"95a3045e-f5e3-4387-9572-4266c08e170b"},{"tpe":"Integer","name":"A","id":"54f0daf1-7955-4f57-b477-2d7a3c85528f"},{"tpe":"Integer","name":"B","id":"f30fad38-2dfc-45b1-b09d-4e384a3e82cb"}]}],"name":"Parcialnumero vampiro","main":{"rawId":"main","tpe":"Void","name":"main","statements":[{"@type":"Begin","id":"id_c3febf81_c774_4f01_a341_22db1d2d1572"},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"N","lengthValue2":"5","id":"id_f4670df8_4958_4316_ba39_28d9d977a205","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"n","lengthValue2":"5","id":"id_91aa69aa_4c7b_470f_9846_855171ebfe51","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"t","lengthValue2":"5","id":"id_d97cc32c_c5fb_4eaa_aa84_05f2a1c04cad","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"k","lengthValue2":"5","id":"id_38c91a05_1af4_4c41_bed2_33c22c3e9b38","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"inf","lengthValue2":"5","id":"id_c577a2c3_96a4_4655_8250_a828a8b27149","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"i","lengthValue2":"5","id":"id_2a8938e1_712f_4912_acc1_27c7e38409c6","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"sup","lengthValue2":"5","id":"id_5b634fbc_9a02_4766_b100_af5e6b75d925","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"A","lengthValue2":"5","id":"id_ea6d3ee3_9e28_4d7c_a49c_70923fe4b2a2","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"B","lengthValue2":"5","id":"id_d137c3fb_3428_49be_86fb_307072ac371b","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"fA","lengthValue2":"5","id":"id_7a6466e1_0d5d_416c_90a2_15f1a6549b51","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Integer","name":"fB","lengthValue2":"5","id":"id_0caa84b9_bf8d_4742_8278_077549c0eb3e","initValue":null},{"lengthValue":-1,"@type":"Declare","lengthValue1":"5","tpe":"Boolean","name":"esVampiro","lengthValue2":"5","id":"id_7fd108da_42a4_428f_87f1_f141a9883ef9","initValue":null},{"@type":"Input","name":"N","id":"id_0ca6fa6e_3c88_420d_85d8_5956f8a99110","prompt":"Please enter N:"},{"@type":"Assign","name":"n","id":"id_3a5d7c46_88eb_4cae_bd13_9c15c9da1648","value":"0"},{"@type":"Assign","name":"t","id":"id_665db482_239b_417d_9c60_c29b803c3502","value":"N"},{"condition":"t > 0","@type":"While","id":"id_becad905_08bc_490b_966e_65a5512aa13e","body":{"statements":[{"@type":"Assign","name":"n","id":"id_eb9ad059_4d66_47e3_9509_fdb0721e2b11","value":"n+1"},{"@type":"Assign","name":"t","id":"id_df926a97_5ce5_484a_8636_0f0d87c316a5","value":"t/10"}],"id":"id_497edf60_d224_4a91_9a40_2bdc3dfc5b36"}},{"newline":true,"@type":"Output","id":"id_b0522a16_0cdf_4a6c_a0b3_dbfed0202b3f","value":"n"},{"falseBlock":{"statements":[{"@type":"Assign","name":"k","id":"id_df12d630_4423_4b48_975a_0501331d89ed","value":"n/2"},{"@type":"Assign","name":"inf","id":"id_b4d6194e_1af4_4636_a812_2af0ae7d0388","value":"1"},{"@type":"Assign","name":"i","id":"id_fac1ab20_3591_4a6a_994d_334eb6491c75","value":"1"},{"condition":"i < k","@type":"While","id":"id_71386fe3_cbc2_4174_9ea4_0c7326e5f652","body":{"statements":[{"@type":"Assign","name":"inf","id":"id_c614d9b6_0b47_42de_a6a7_bfe44f88fd30","value":"inf*10"},{"@type":"Assign","name":"i","id":"id_cf5e1569_a818_45cd_89f6_fc21d31010f9","value":"i + 1"}],"id":"id_b85bcd4d_50b9_4432_854b_fe404e122311"}},{"@type":"Assign","name":"sup","id":"id_11cf3128_4a08_46d6_bcbf_656e0e5d98cc","value":"inf * 10 - 1"},{"@type":"Assign","name":"A","id":"id_bd3d47d0_5459_4bcd_b3ba_2b67b9d13f1a","value":"inf"},{"@type":"Assign","name":"esVampiro","id":"id_7666e1d1_d74e_4edb_9260_54eb14efd297","value":"false"},{"@type":"Assign","name":"fA","id":"id_e345a935_e1a3_4248_a2b8_dd394b0b591f","value":"0"},{"@type":"Assign","name":"fB","id":"id_355a6725_3744_48d7_84f9_69ecfe68197b","value":"0"},{"condition":"A <= sup && !esVampiro","@type":"While","id":"id_86aa789f_1ee8_4ba7_881d_f29b38e7f9ce","body":{"statements":[{"falseBlock":{"statements":[],"id":"id_10c09f60_8d90_4209_8010_d1dc3facc32b"},"trueBlock":{"statements":[{"@type":"Assign","name":"B","id":"id_9be7e472_f498_4c9e_a3a5_e6fc65bcecc0","value":"N / A"},{"falseBlock":{"statements":[],"id":"id_b98eb691_e319_457e_9b2e_677ba02f871c"},"trueBlock":{"statements":[{"falseBlock":{"statements":[],"id":"id_61d625e8_a19c_4c39_9bef_65b6d985ffa3"},"trueBlock":{"statements":[{"falseBlock":{"statements":[],"id":"id_4762a25e_8e2f_4504_af2f_bb9e48d220a1"},"trueBlock":{"statements":[{"@type":"Assign","name":"esVampiro","id":"id_e48f40a3_2732_4c9d_a501_4921afeb299b","value":"true"},{"@type":"Assign","name":"fA","id":"id_83788ec8_67c7_4f87_ade7_ec334979e6e3","value":"A"},{"@type":"Assign","name":"fB","id":"id_be547cb5_96fe_441b_ba92_c64b013354e1","value":"B"}],"id":"id_51b93676_cf63_4768_81d3_d9c63d11aff4"},"condition":"mismos(N, A, B)","@type":"If","id":"id_b0922bf9_b3bc_4594_8d2a_f2821189fad6"}],"id":"id_d6977906_8fb9_42b0_905d_6e0697a22f89"},"condition":"!((A % 10 == 0) && (B % 10 == 0))","@type":"If","id":"id_6282ff4c_5ad3_4602_9cae_f873cfc53fd2"}],"id":"id_aeea21a3_eec8_41f9_ad64_2c1a3a018398"},"condition":"B >= inf && B <= sup","@type":"If","id":"id_ed950e8f_07e3_464d_8406_30398bc27a09"}],"id":"id_96a45428_ff6d_4f2e_8085_4e0dd7346ce5"},"condition":"N % A == 0","@type":"If","id":"id_bfd8a5d7_e193_4690_aab7_23aa6d019851"},{"@type":"Assign","name":"A","id":"id_f2e9f52e_af97_4358_9218_a362f5b890da","value":"A + 1"}],"id":"id_d9bcac26_6dcb_4b33_92d9_cbe7542356c1"}},{"falseBlock":{"statements":[{"newline":true,"@type":"Output","id":"id_b3268361_6a93_496b_bc6d_ac2f988a53e9","value":"\"No es vampiro\""}],"id":"id_5eb8a148_d417_4865_a633_6ec67ecf7b64"},"trueBlock":{"statements":[{"newline":true,"@type":"Output","id":"id_066edbc2_5670_4b1e_a16e_807c511ed53f","value":"\"Es vampiro\""},{"newline":true,"@type":"Output","id":"id_8e737d6c_bfcb_41fb_bd4f_8d9f45100dae","value":"fA"},{"newline":true,"@type":"Output","id":"id_20f64d7d_c5e2_49e4_9d07_a9b95ead97a9","value":"fB"}],"id":"id_8c9d26f2_12b6_4411_af23_8664a5f4ea44"},"condition":"esVampiro","@type":"If","id":"id_13775be1_88c3_4d64_958b_1354e320ee49"}],"id":"id_cce5c646_bfdb_4c5d_a30a_15889decb4af"},"trueBlock":{"statements":[{"falseBlock":{"statements":[{"newline":true,"@type":"Output","id":"id_c01d4e7e_0d69_48bc_8c2a_7b92b55ce522","value":"\"No es vampiro\""}],"id":"id_b8160cc8_3c74_4929_b27e_e5c1b7bae267"},"trueBlock":{"statements":[{"newline":true,"@type":"Output","id":"id_179b3cfe_2644_42ff_900a_e9e09008d507","value":"\"Entrada no vĂ¡lida\""}],"id":"id_cbabc760_f83e_4609_9b84_f6b46c4c5573"},"condition":"N <= 0","@type":"If","id":"id_ce080439_2106_423d_9915_463aec69d1da"}],"id":"id_a1e3666a_edf1_4e8c_8429_0ee68eff03ee"},"condition":"(N <= 0) || (n % 2 != 0)","@type":"If","id":"id_6a8acb0a_5de3_46eb_b19d_b4fd2324f888"},{"@type":"Return","id":"id_95141c90_a752_4e2b_9b39_9a0dbeca288d","maybeValue":null}],"parameters":[]},"id":"id_f318bd4d_0bc7_4bb4_9f5f_136d3a1353c7","config":{"showDebugVars":true,"useInputPrompt":true,"echoEnteredValue":false,"showIoBtns":true,"showFunctions":true,"lang":"java","showGenCode":false},"version":"0.3","revision":517}