viết câu lệnh dưới dạng while-do Uses S: real; i : integer; begin clrscr; S:=0; For i:=1 to 100 do S:=S+1/i; Write(S:10:3); readln; end. giúp mình vs. mình đang cần gấp đúng vote cho 5 sao

Các câu hỏi liên quan