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

Câu 21. 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 = 26 C. Y = 46 D. Y = 54