5xy^2+y^2+4xy-2x+13 tìm giá trị nhỏ nhất của biểu thức

Cho đoạn chương trình sau: s := 0; i := 1 while s <= 10 do begin i := i + 1; s := s + i; end; 

xác định điều kiện và câu lệnh