`1)`Viết chương trình tính tổng các số lẽ lớn hơn `0` và nhỏ hơn `20`.
`2)`Viết chương trình nhập số nguyên `m,n` `(n \leq m)`. Mỗi lần tăng `n` thêm `2` đơn vị, hỏi tăng sau bao nhiêu lần thì `n` sẽ gần bằng hoặc bằng `m`.
`1)`Viết chương trình tính tổng các số lẽ lớn hơn `0` và nhỏ hơn `20`.
`2)`Viết chương trình nhập số nguyên `m,n` `(n \leq m)`. Mỗi lần tăng `n` thêm `2` đơn vị, hỏi tăng sau bao nhiêu lần thì `n` sẽ gần bằng hoặc bằng `m`.
câu 1:
Program Tinh_tong_so_le;
Uses CRT;
Var i,n,S:integer;
sl:boolean;
Begin
Clrscr;
For i:=1 to 20 do
S:=S+i;
Writeln(‘Tong cua n so le la:’, S);
Readln;
End.