помогите, пожалуйста!!!!!! Безотлагательно!!)) Информатика, 9 класс, Паскаль! Дано целое положительное

Помогите, пожалуйста!!!!!! Срочно!!)) Информатика, 9 класс, Паскаль! Дано целое положительное пятизначное число.Отыскать творение нечетных цифр данного числа. Спасибо заблаговременно

Задать свой вопрос
1 ответ
Var
A:longint;
Begin
WriteLn('Введите пятизначное число');
ReadLn(A);
Write('Творение нечётных цифр = ',(A div 10000)*((A div 100) mod 10)*(A mod 10))
End.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт