. Що буде результатом виконання даного циклу! i:=1;n:=0;
while i<=3 do
begin
п: =n+1;i:=i+1;
end;
Edit1.Text:=IntToStr(n);​

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку