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

Câu 24: 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 = 26 B. Y = 38 C. Y = 46 D. Y = 54

PHẦN II. THỰC HÀNH TRÊN MÁY TÍNH (4 điểm)

Hãy lập trình giải phương trình bậc nhất ax + b = 0. Với a, b là các số thực nhập vào

từ bàn phím.