Var a,b,c,s:Integer;
begin
Read(s);
a:= s div 100;
b:= s div 10 mod 10;
c:= s mod 10;
if odd(s) then
WriteLn('Нечетное. произведение чисел равно '+a*b*c)
else
WriteLn('Четное. Сумма чисел равна '+(a+b+c));
end.
Персональный компьютер, ПК, ПЭВМ (персональная электронно-вычислительная машина) — настольная микро-ЭВМ, имеющая эксплуатационные характеристики бытового прибора и универсальные функциональные возможности
Программное обеспечение – это набор команд, управляющих работой компьютера. Безпрограммного обеспечениякомпьютер не сможет выполнять задачи, которые мы обычно связываем с компьютерами.
Аппаратное обеспечение — комплекс электронных, электрических и механических устройств, входящих в состав системы или сети. Аппаратное обеспечение включает: компьютеры и логические устройства; внешние устройства и диагностическую аппаратуру; энергетическое оборудование
Прошу прощения что на листе, надеюсь, всё будет понятно
Пусть Команда1 = <span>Сместиться на (х1,у1)
Чтоб вернуться в ту же точку</span>, надо чтоб смещение было (0;0)
1)
dx = 0 = 2(x1+3+2)-6 = 2x1+4 = 0, x1=-2
dy = 0 = 2(y1+2+1)-4 = 2y1+2 = 0, y1=-1
Команда1 = <span>Сместиться на (-2,-1)
</span>
2)
dx = 0 = 4(x1+3+1)-8 = 4x1+8 = 0, x1=-2
dy = 0 = 4(y1+3-2)+12 = 4y1+16 = 0, y1=-4
Команда1 = Сместиться на (-2,-4)