Question

Answer 1

a) Máy tính sẽ thực hiện 6 vòng lặp

t=0; j=30

Answer 2

b) 

uses crt;

var j,t:integer;

begin

t:=105; 

j:=0;

while t>=20 do

begin

j:=j+5;

t:=t-j;

end;

writeln(t);

writeln(j);

readln;

end.