Чтобы программировать и создавать программы
var
a: integer;
b: real;
begin
writeln ('введи целое число');
read (a);
if a mod 2=0 then b:=a/2
else
b:=a*a*a;
writeln ('результат',b);
end.
A = list()
i = 0
while 1:
A.append(int(input()))
if(i > 1):
last = A[i-1]
now = A[i]
if(last == 0 and now == 0):
break
i+= 1
summa = 0
for i in range(len(A)):
summa += A[i]
print(summa)
Var a,b:integer;
begin
Writeln('Введите два числа через пробел');
Read(a,b);
If a<b then write('1') else write('2');
<span>End.</span>
( A U B ) ^ B ^ A = пустому множеству.
Сначало мы обьединяем два множества, потом вычитаем B, потом А