Файл Microsoft Excel 2010
Как я понял, объём продаж - количество проданных машин.
Делаем условие во время выполнения цикла-это и будет наше разветвление.
N = int(input())
Bool = 0
while (N>0) and (Bool == 0):
if ((N % 10) % 2 != 0):
print('Имеются нечетные цифры')
Bool = 1
else:
N//=10
if Bool != 1:
print('ничего нет')
var a:Integer;
begin
readln( a );
write( (a div 1000) * ((a div 100) mod 10) + ((a div 10) mod 10) * (a mod 10) );
end.
Пояснение:
a - 4-значное число, тогда:
a div 1000 - первая цифра числа.
(a div 100) mod 10 - вторая цифра числа.
(a div 10) mod 10 - третья цифра числа.
a mod 10 - четвёртая цифра числа.