Вместо букв, вставь подходящие цифры таким образом, чтоб частное соответствовало условию. АВ254:73; КС106:28; частное трехзначное число и ДН162:64; МЛ008:18; частное четырёхзначное число
К сожалению вы не написали условие.на VBA эта задача решается банальным перебором, вот для 1-го примера:sub ppp()for A = 1 to 9for b = 0 to 9if (A*10000+b*1000+254)/73 = xxx then тут условие которое вы не написалиmsgbox(A*10000+b*1000+254)endifend sub
Оцени ответ
