Написать программу (полностью) для нахождения произведение суммы нечетных цифр и их минимума в четырехзначном числе. программа должна начинаться следующим образом и не содержать иных переменных кроме данных. var min, digit, s, n, res : integer; begin readln(n); входные данные: четырехзначное число. выходные данные: результат
ЭляВ1988
2
05.10.2019 08:50
1
Другие вопросы по теме Информатика
matany57
17.05.2020 02:37
Dalgat0
17.05.2020 05:19
00LenaVaganova11
18.05.2019 06:10
Otlichnisa140455
21.10.2019 20:02
agbelova
21.10.2019 20:00
Denis7788
21.10.2019 19:59
isshaixyt5
08.07.2019 12:30
Популярные вопросы
- 6. Каким изображёнв рассказе Александр суворов А Кузьма Шапкин найди в тексте...
3 - Твір на тему моє улюблене заняття перегляд фільму...
1 - Задание 1: Укажите на контурной карте границы территорий следующих государств....
2 - очень нужно, сейчас будет самостоятельная ...
2 - Поставьте сказуемые следующих предложений в Past indefinite tense. 1) Do you...
3 - 814: Виразіть у метрах і запишіть у вигляді десяткового дробу. 1) 125 см;3)...
2 - Взаимодействие веществ с кислородом часто сопровождают: Aпоявление запаха и...
2 - Проблемы поплану 1)Служба на Кавказе,письмо от матери. 2)Дорога домой,нападение...
1 - Слід розуміти що абсолютна влада короля не означала необмежної тиранії. Так,...
2 - Переведите текст на английский язык «Індивідуальне представництво інтересів»В...
1
... - уже данный код в условии
s := 0;
min := 10;
for res := 1 to 4 do
begin
digit := n mod 10;
if (digit mod 2 = 1) then
begin
s += digit;
if (digit < min) then
min := digit;
end;
n := n div 10;
end;
writeln(s * min);
end.