Ответ: 24 ( прикрепила фотографию)
n:=5;
x:=0;
for i:=1 to n do
x:=i;
После выполнения цикла значение x будет равно 5
Label1.Caption:=IntToStr(x);
На экран будет выведено 5
A B НЕ A НЕ A ИЛИ B
0 0 1 1
0 1 1 1
1 0 0 0
1 1 0 1
Уменьшится в 2 раза.
в юникоде сообщение составляет 40 байт, в кои-8 - 20 байт.
значит и уменьшится на 20 байт
Нужно наполнить 2-ой аул и вылить в 1-ый аул. Потом сново наполнить 2-ой аул и сново вылить в 1-ый до его наполнение. Выливаем 1-ый аул, а второй вылить в 1-ый и сново наполнить 2-ой аул и вылить в 1-ый.