В пятизначном числе вычеркнуть цифры через одну, начиная вычеркивать первую слева.

В пятизначном числе вычеркнуть цифры через одну, начиная вычеркивать первую слева. (Дано: 73942. Итог: 34)
ПАСКАЛЬ

Задать свой вопрос
1 ответ
Var
A:integer;
Begin
WriteLn('Введите пятизначное число');
ReadLn(A);
WriteLn((A div 1000) mod 10,(A div 10) mod 10)
End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт