Câu 1: Cho biết kết quả biến S đoạn chương trình sau P:=1; S:=0; While S<15 do Begin P:=P+1; S:=S+P; End; Câu 2: Chương trình sau cho kết quả thế nào Vì sao Var a, b, S: integer; begin a:=50; b:=27; while b< a do S:=S+a-b; write(„tong S=‟, S); end.