= "§O¹N M· SAU IN KÕT QU¶ NΜỎ" "VAR I

24) - CAU HOI ON TAP PASCAL
CAU HOI ON TAP PASCAL
24) = "§o¹n m· sau in kÕt qu¶ nµỏ" "var I: integer;" " s,a,b: real;" "Begin" " b:=0;" " a:=1; I:=1; s:=0;" " while a>b do" " Begin" " s:=s+a;" " I:=I+1;" " A:=1/(i*i);" " End;" " Writeln('tong=',s);" "End." "" (24, 1) = "s=10" (24, 2) = "s=0" (24, 3) = "vßng lÆp v« h¹n”* (24, 4) = "s=1"