Складывать так же, но если будет 2, то 1 добавляется на следующий разряд.
ну например 100101+10101
сначало складываем 2 единицы справа, будет 2. 2 не пишем, а пишем 1 в следующем разряде. 101010
Дальше решения из задания
100101+101=101010
101101+111=110100
110011+1101=1000000
100100-1010=11010
110101-110=101111
10101-101=10000
Крайние точки не учитываются. Если вам необходимо, чтобы они учитывались - замените знаки < и > на <= и >=
var
Y0,X0:integer;
begin
writeln('Введите координаты точки Y0 и X0');
readln(Y0,X0);
if ( ((X0>-6) and (X0<-3)) and ((Y0>-3) and (Y0<2)) )
or
( ((X0>-6) and (X0<-1)) and ((Y0>2) and (Y0<6)) )
then
writeln('Точка принадлежит области')
else
writeln('Точка НЕ принадлежит области')
end.
Var a,b,c:longint;
Begin
read(a,b,c);
if c mod 2=1 then
writeln('Нечетное') else
writeln('Четное');
if ((c>=a) and (c<=b)) then
writeln('YES') else
writeln('NO');
<span>End.</span>
Program g;
var A,B,C: real;
begin
readln(A);
C:=A; // А в степени 1
B:=A*A; // А в степени 2
A:=B*B; // А в степени 4
A:=A*B*C; // А в степени 1 на 2 на 4 = А в степени 7
writeln(A);
end.