KHAI BÁO VAR X,Y,R

Câu 25: Khai báo VAR X,Y,R:Integer; F: REAL; và đoạn chương trình

IF X MOD Y = 0 THEN

Begin

R := 1;

X := X DIV Y;

End

ELSE

R := X MOD Y;

Y := X DIV Y;

End;

Cho biết giá trị biến X, Y, R sau khi thực hiện đoạn chương trình ứng với X=25,Y= ?

A. X=25, Y=1, R=3

B. X=25, Y=3, R=3

C. X=25, Y=4, R=1

D. X=25, Y=3, R=1