Оформи таблицу сам. пишу алгоритм, цифры тебе пояснения сколько в каком сосуде воды.
<span>Наполнить сосуд А 5-0
</span><span>Перелить из сосуда А в В 0-5
</span><span>Наполнить сосуд А 5-5
</span>Перелить из сосуда А в В 1-9
<span>Вылить из сосуда б 1-0
</span>Перелить из сосуда А в В 0-1
<span>Наполнить сосуд А 5-1
</span>Перелить из сосуда А в В 0-6
Наполнить сосуд А 5-6
Перелить из сосуда А в В 2-9
<span>Вылить из сосуда б 2-0
</span>
<span>Перелить из сосуда А в В 0-2
</span><span>Наполнить сосуд А 5-2
</span><span>Перелить из сосуда А в В 0-7</span>
1 не получится т. к. не таких цифр, сложив которые можно получить 19.(можно получить максимум 18=9+9). третье нельзя получить т к они не в порядке возрастания. Второе получить не получается. Ответ правильный 4. Пример цифр для 815: 1 7 8. 1+7=8! 7+8=15 и записываем 815
Еж-ежик......................
//PascalABC.Net 3.2
{1}
begin
var sum:=0;
for var i:=1 to readinteger('Введите кол-во чисел: ') do sum+=readinteger;
print ('Сумма:', sum);
end.
{2}
function f(n: integer):=1/n;
begin
var sum:=0.0;
for var i:=1 to readinteger ('Введите n: ') do sum+=f(i);
write ('S = ', sum);
end.
{3}
begin
var count:=1;
for var i:=1 to readinteger('Введите кол-во часов: ') div 3 do count*=2;
write ('Кол-во амеб: ', count);
end.
{4}
begin
var sum:=0.0;
var x:=readreal ('Введите x: ');
for var i:=1 to readinteger('Введите N: ') do sum+=sin(i*x);
write (sum);
end.
{5}
function pow(a, n: integer):biginteger;
begin
var sum:=1;
for var i:=1 to n do sum*=a;
result:=sum;
end;
begin
write (pow(readinteger, readinteger));
end.