Ответ:
Я бы посоветовал(ала) свои друзьям сайт YouTube там можно посмотреть всякие развлекательные видео ролики,WhatsApp-Viber там можно общаться со своими друзьями,Play Маркет-можно установлять всякие различные игры на телефон-планшет,
я прикрепил файл.если что то не понятно говорите
Делим нацело на 8, выделяем остатки:
1112 : 8=139 остаток 0
139 : 8=17 остаток 3
17:8 = 2 остаток 1 число собираем с последнего частного и далее -
все остатки от деления 2130
Проверка:
2130= 2*8^3+1*8^2+3*8=1112
и далее - аналогично
По сути, решается уравнение
7х-6у=6
Решение только одно.
6 раз вперед 7
7 раз назад 6
Program OddNumeric;
var
n, i: integer;
a: array [1..3] of byte;
b: boolean;
begin
Write('Введите трехзначное число: ');
Readln(n);
a[1]:=n div 100; {1 цифра сотен}
a[2]:=(n div 10) mod 10; {2 цифра десятков}
a[3]:=n mod 10; {3 цифра количество единиц}
b:=false;
for i:=1 to 3 do
begin
if (a[i] mod 2)=0 then
b:=true;
end;
if b then
Writeln('В этом числе есть четные цифры')
else
Writeln('В этом числе нет четных цифр');
end.