что будет выведено на экран в результате выполнения инструкций


n:=5;
x:=0;
for i:=1 to n do
x:=i;
Label1.Caption:=IntToStr(x);​

n:=5;

x:=0;

for i:=1 to n do

x:=i;

После выполнения цикла значение x будет равно 5

Label1.Caption:=IntToStr(x);​

На экран будет выведено 5