Вот решение задачи на языке Паскаль: ``` program ending_digit; var num, ending_digit, result: integer; i: integer; begin write('Введите число: '); readln(num); ending_digit := num mod 10; // определяем последнюю цифру числа result := num; for i := 1 to ending_digit do begin result := result * num; // умножаем число само на себя ending_digit раз end; writeln('Число ', num, ' оканчивается на цифру ', ending_digit); writeln('Результат: ', result); end. ``` Программа сначала запрашивает у пользователя число, затем определяет на какую цифру оно оканчивается. Далее запускается цикл, который умножает число само на себя столько раз, на сколько оканчивается исходн