Объяснение:
Например:дети 40кг одежда 3кг сумка 2кг вещи 5 кг удачки 10кг обувь 1 кг рыба 20 кг 40+3+2+5+1+20=71 вот так вроде
Var
n,d1,d10,d100:integer;
begin
Write('Введите натуральное трехзначное число: '); Read(n);
d1:=n mod 10; d100:=n div 100;
d10:=(n div 10) mod 10;
if (d1 mod 2 = 0) or (d10 mod 2=0) or (d100 mod 2=0)
then Writeln('Есть четная цифра')
else Writeln('Нет четных цифр')
end.
Я оформил каждое задание в отдельной функции. Пожалуйста, перед сдачей проверь на правильность выполнения т.к. у меня нет среды разработки и компилятора)) Перепрофилировался в джаву с питоном))
1674-786= 888 по-моему условие не правильное
По оси x: 0+(-2)+4=2, так как повторить 5 раз, то 2*5=10
по оси y: 1+3+(-5)=-1, так как повторить 5 раз, то -1*5=-5
в точку (10, -5) Чертежник попал бы, если бы начинал движение с точки (0,0)
а так как он начинал с точки (3,1),то
по оси х: 10+3=13
по оси y: -5+1=-4
(13, -4)
ответ: 3