В программе Паскаль.
Дано натуральное число. Вывести его первую и предпоследнюю цифру (цифры нумеруются справа на лево). Вывести цифру заданным номером k.
— Правильный ответ на вопрос найдете ниже

Ответ: Var   A:longint;   k:byte;BeginWrite(‘Введите натуральное число: ‘);ReadLn(A);Write(‘k = ‘);ReadLn(k);WriteLn(‘Первая цифра: ‘,A mod 10);For k:= 1 to k-1 do    A:=A div 10;k:=A mod 10;While A div 10 > 0 do   A:=A div 10;WriteLn(‘Последняя цифра: ‘,A);WriteLn(‘Цифра №k: ‘,k);End.Пример работы программы:Введите натуральное число: 968764513k = 5Первая цифра: 3Последняя цифра: 9Цифра №k: 6