B. B ограничение по времени на тест1 s.
ограничение по памяти на тест256 MB
вводstandard input
выводstandard output
Определим рекуррентную последовательность следующим образом:
an+1=an+minDigit(an)⋅maxDigit(an).
Здесь minDigit(x) и maxDigit(x) — минимальная и максимальная цифры в десятичной записи числа x без ведущих нулей соответственно. Для примеров обратитесь к примечаниям.
Ваша задача — по заданным a1 и K вычислить aK.
Входные данные
В первой строке записано единственное число t (1≤t≤1000) — количество независимых наборов входных данных.
Каждый набор входных данных состоит из двух целых чисел a1 и K (1≤a1≤1018, 1≤K≤1016), записанных через пробел на отдельной строке.
Выходные данные
Для каждого набора входных данных выведите одно число aK на отдельной строке.
Пример
входные данныеСкопировать
8
1 4
487 1
487 2
487 3
487 4
487 5
487 6
487 7
выходные данныеСкопировать
42
487
519
528
544
564
588
628
Примечание
a1=487
a2=a1+minDigit(a1)⋅maxDigit(a1)=487+min(4,8,7)⋅max(4,8,7)=487+4⋅8=519
a3=a2+minDigit(a2)⋅maxDigit(a2)=519+min(5,1,9)⋅max(5,1,9)=519+1⋅9=528
a4=a3+minDigit(a3)⋅maxDigit(a3)=528+min(5,2,8)⋅max(5,2,8)=528+2⋅8=544
a5=a4+minDigit(a4)⋅maxDigit(a4)=544+min(5,4,4)⋅max(5,4,4)=544+4⋅5=564
a6=a5+minDigit(a5)⋅maxDigit(a5)=564+min(5,6,4)⋅max(5,6,4)=564+4⋅6=588
a7=a6+minDigit(a6)⋅maxDigit(a6)=588+min(5,8,8)⋅max(5,8,8)=588+5⋅8=628
в течение 4 часов код С++
#include <cstdlib>
#include <ctime>
int main()
{
using namespace std;
cout << "Enter size of array: ";
int N;
cin >> N;
int * ARR = new int[N];
srand(time(0));
int i;
for (i = 0; i < N; ++i)
ARR[i] = rand() % 100 + 1;
cout << "Here is an original array:\n";
for (i = 0; i < N; ++i)
cout << ARR[i] << " ";
cout << endl;
int temp = ARR[N - 1];
for (i = N - 1; i > 0; --i)
ARR[i] = ARR[i - 1];
ARR[0] = temp;
cout << "\nHere is a new array:\n";
for (i = 0; i < N; ++i)
cout << ARR[i] << " ";
cout << endl;
return 0;
}
Dim a As Integer
Dim b As Integer
Dim i As Integer
a = InputBox("Введите а")
b = InputBox("Введите b")
Dim msg As String
msg = ""
For i = a To b
msg = msg & 3 в степени " & i & " равно " & 3 ^ i & vbCrLf
Next
MsgBox(msg)
2)Найти все делители числа 1204.
Dim i As Integer
Dim msg As String
msg = ""
For i = 1 To 1204
If 1204 Mod i = 0 Then
msg = msg & "Число " & i & " является делителем 1204." & vbCrLf End If
Next
MsgBox(msg)