Дано натуральное число n найти произведение нечетных цыфр заданного числа.Пожалуйста Срооочно .Если можно схeму тоже составьте и сфоткайте
Нет комментариев
Ответы
Гость Program asdasd;
var n,r,i:integer;
begin;
r:=1;
read(n);
for i:=1 to length(inttostr(n)) do
if strtoint(inttostr(n)[i]) mod 2 = 1 then r*=strtoint(inttostr(n)[i]);
write(r);
end.
Нет комментариев
Похожие вопросы
Информатика
Слова имеющие значение ещё не время 4 буквы?...
Информатика
Составить 3 алгоритма...
Список предметов
