Тоест тебе надо написать так там должно быть 2 персонажа у которых нет цели которые делают всё по пути и такое управление ведет к бесконечным алгоритмам
№9 в памяти компьютера
№10 графический редактор - создавать и обрабатывать изображение
музыкальный редактор - обрабатывать и редактировать музыку
<span>1)из (14) наливаем в (5)</span>
<span>2)из (5) наливаем в (9)</span>
<span>3)повторяем пункт 1 </span>
<span>4)из (5) наливаем в (9) остается 1л</span>
<span>5)переливаем из (9) в (14)</span>
<span>6)выливаем 1л из (5) в (9)</span>
<span>7)из (14) наливаем в (5)</span>
<span>8)из (5) наливаем в (9) </span>
<span>в битоне(9) находится 6л молока</span>
<span>9)из (14) наливаем в (5)</span>
<span>10)из (5) наливаем в (9) </span>
<span>в битоне (5) остается 2л молока</span>
<span>11)переливаем из (9)в (14)</span>
<span>12)наливаем в (9) 2л молока из (5) </span>
<span>13)из (14) наливаем в (5)</span>
<span>14)из (5) переливаем в (9)</span>
uses crt;
var ch,a:integer;
begin
readln(ch);
readln(A);
if ((ch div 10)+( ch mod 10)) mod a = 0 then
writeln('YES') else writeln('NO');
readln;
end.
2.
uses crt;
var i,os:integer;
a:array[1..31] of integer;
begin
randomize;
os:=0;
for i:=1 to 31 do
begin
a[i]:=random(5)+0;
if a[i]=0 then inc(os);
end;
for i:=1 to 31 do
write(a[i],' ');
writeln;
if os = 10 then
writeln('YES') else writeln('NO');
readln;
end.
11 делаем