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.
Câu 1: Đáp án là 14.
Câu 2 đk của b<a thì luôn luôn rùi nên máy sẽ chạy liên tục ok bạn