Вместо букв, вставь подходящие цифры таким образом, чтоб частное соответствовало условию. АВ254:73; КС106:28; частное трехзначное число и ДН162:64; МЛ008:18; частное четырёхзначное число

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