На столько хватило времени.
Еще можно при помощи макросов автоматизировать ведение базы до 60000 записей
Наименьшее число - 8094
Из алгоритма видно, что сначала сравнивают, четно или нет число d. Если четно, то берут остаток от деления числа на 10, т.е крайнюю правую цифру числа и суммируют ее с a, если не четно, то суммируют c b. Затем прибавляют 1 к d, и получают целую часть от деления x на 10. Т.к изначально d = 0, то можно сделать вывод о том, что в переменной a хранится сумма всех цифр x, которые стоят на нечетных местах, а в переменной b - сумма цифр, стоящих на четных местах(Считая справа, т.к алгоритм работает справа налево). 17 можно получить, если сложить 9 и 8. Таким образом, мы выставляем 9 и 8 на четные позиции, а 4 ставит крайней справа, и тогда между 8 и 9 окажется 0. Так мы получим число 8094
Ответ:
program dvuznach;
var a,b,c,d,f:integer;
begin
writeln('Введите двузначное число');
readln(a);
b:=a div 10;
c:=a mod 10;
d:=b+c;
f:=b*c;
writeln('Сумма=',d);
writeln('Произведение=',f);
end.
Объяснение:
бірінші жолда 10, 16; төртінші жолда 18,4,0; бесінші жолда 11,4,6, (әрі қарай білмеймін)