Trung Kien's Profile

1. Viết chương trình nhập vào 1 số a. Nếu a không phải là số dương thì nhập lại, đến khi nào là
số dương thì dừng.
Gợi ý: - Nhập a
- While a < 0 do readln(a);

2. Viết chương trình nhập vào 1 số a. Nếu a không phải là số chẵn thì nhập lại, đến khi nào là số
chẵn thì dừng. (Gợi ý: tương tự bài : đk a mod 2 <> 0)
3. Viết chương trình tính tổng số nguyên từ 1-n, n là số nguyên nhập từ bàn phím. Sử
dụng vòng lặp while... do
while i<=n do
begin
i:=i+1;
s:=s+i;
end;
4. Tính S=1+1/2=1/3+1/4+...
Dừng khi 2-S<0.01
Gợi ý: tương tự bài 3 đk là: while 2-s<0.01 do ...