написать программу для нахождения предпоследней числа любого числа ПОМОГИТЕ ПЛИЗ НЕ

Написать программку для нахождения предпоследней числа хоть какого числа
ПОМОГИТЕ ПЛИЗ НЕ ШАРЮ В ЭТОМ

Задать свой вопрос
1 ответ
Var a,b:integer;
begin
write('a (gt;0) = ');
readln(a);
b:=a mod 100 div 10;
writeln('Предпоследняя цифра = ',b);
end.

Пример:
a (gt;0) = 180653
Предпоследняя цифра = 5
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт