Скільки разів. Виконається цикл?
k:=2;a:=15;
while a<50 do
а:=a*k;
end;​

Губотрах    3   28.04.2021 12:01    4