)) информатика, 9 класс, паскаль! дано целое положительное пятизначное число.найти произведение нечетных цифр данного числа. заранее ❤

voenngti voenngti    2   26.08.2019 04:40    0

Ответы
helloooo2 helloooo2  05.10.2020 20:19
Var
A:longint;
Begin
WriteLn('Введите пятизначное число');
ReadLn(A);
Write('Произведение нечётных цифр = ',(A div 10000)*((A div 100) mod 10)*(A mod 10))
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика