<em>// PascalABC.NET 3.2, сборка 1427 от 24.04.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function Pow(x,y:BigInteger):BigInteger;
begin
Result:=x;
for var i:=int64(2) to int64(y) do Result*=x
end;
begin
var x,y:integer;
Write('Введите натуральные х и у: '); Read(x,y);
if (x<=0) or (y<=0) then begin
Writeln('Неверный ввод'); Exit
end;
if x=1 then Writeln('Результат: ',y+1)
else begin
var x1:=Range(2,x).Aggregate(BigInteger(1),(a,b)->a*b);
Writeln('Результат ',Pow(x,y)+Pow(y,x1))
end
end.
<u>Пример</u>
Введите натуральные х и у: 5 8
Результат 2348542582773833227889480596789337027375682548908319870707290971532209025114608443463698998384768703032325601
Найдем координаты, в которые переместился Чертежник: суммируем координаты "x" вместе с "x", "y" вместе с "y". При этом, сумму каждой оси умножаем на "4", так как цикл повторяется четыре раза.
x = 4*(2 + (-2) + (-2)) = 4*(-2) = -8.
y = 4*(3 + 1 + (-2)) = 4*2 = 8.
Чтобы Чертежник вернулся в исходную точку, его координаты должны стать (0,0). Для этого полученные значения "x" и "y" умножаем на "-1". Получаем команду "Сместиться на (8,-8)".
Ответ: 4.
Тут решение сложное обращайся к поисковику
В последовательности длиной 5 возможны следующие способы расположения буквы О (* - любая из букв К или Т):
ОО***
О*О***
О**О*
О***О
*ОО**
*О*О*
*О**О
**ОО*
**О*О
***ОО
Всего 10 способов. В каждом из низ существует 2^3 = 8 вариантов записи букв К и Т на трёх оставшихся позициях (ККК, ККТ, КТК, КТТ, ТКК, ТКТ, ТТК, ТТТ).
Таким образом, общее количество последовательностей = 10*8 = 80
Блок-схема по нахождению площади