Дано целое неотрицательное число N, определите число десятков в нем (предпоследнюю цифру числа). Если предпосленей цифры нет, то можно считать, что число десятков равно нулю. (Напишите программу для решения в Pascal.ABC)
Дано целое неотрицательное число N, определите число десятков в нем (предпоследнюю цифру числа). Если предпосленей цифры нет, то можно считать, что число десятков равно нулю. (Напишите программу для решения в Pascal.ABC)
Гость
Ответ(ы) на вопрос:
Гость//PascalABC.Net 3.1.0.1200
begin
var n := ReadInteger(' n =');
writeln(n div 10 mod 10);
end.
Не нашли ответ?
Похожие вопросы