Question

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

Answer 1

Ответ:

'3'

n i

0 1

1 2

2 3

3 4