CHƯƠNG TRÌNH SAU TRẢ VỀ GIÁ TRỊ BAO NHIÊU

Câu 1: Chương trình sau trả về giá trị bao nhiêu? Var y, x, i:byte; Begin X:=20; i:=1; y = 0; While i < x do Begin Y:=x+i; i:=i+5; End;Writeln(‘gia tri cua y:= ‘,y);End.A. Y = 36 B. Y = 31 C. Y = 26 D. Y = 41