Perhatikan potongan program berikut.

var
am, ra : integer;
begin
  am:=500;
  ra:=100;
  repeat
    ra:=ra+1;
    am:=am-ra;
  until am>ra;
  writeln(am,' dan ',ra);
end.

Apakah output dari program di atas?:

A. 90 dan 104

B. 90 dan 105

C. 194 dan 103

D. 297 dan 102

E. 399 dan 101