21 это точно правильный ответ
По моему такая задача уже была. Ну ладно
1. Половина детей любит пирожное 52/2=26
2. Мы знаем, что 20 детей любит либо пирожное, либо пирожное и мороженое. Прибавим их к тем кто любит только пирожное 20+26=46
3. Оталось из всего количества детей вычесть полученный результат 52-46=6
Ответ: 6 - детей любит мороженое
\%SystemRoot\%/system32/rundll32 user32, SwapMouseButton >default
Var
i:integer;
a:array[1..25]of integer;
begin
for i:=1 to 25 do
begin
a[i]:=random(0,100);
write(a[i],' ');
end;
<span>end.</span>