Viết chương trình nhập n từ bàn phím (1<=n<=2018)
Tính tổng S=1+1/(1+2)+1(2+3)+..+1/((n-1)+n)+2018
để tính tổng s=2+4+6 ... +n;
em chọn lệnh:
a) for i:=1 to n do if (i mod 2)=0 then s:=s+1;
b) for i:=1 to n do if (i mod 2) <> 2 then s:=s+1;
c) for i:=1 to n do s:=s+1;
d) for i:=1 to n do if (i mod 2) = 1 then s:=s+1;
mn giúp em với ạ, cảm ơn mn nhiều
Với N là số tự nhiên cho trước. Viết chương trình tính tổng
S=1/2+1/4+...+1/2*N
Giả sử cho trước N thì
S=1/2+1/4=0,5+0,25=0,75
VD: Nhap N= 2KQ*S=0,75
viết chương chình tính tổng bình phương các số chẵn từ 1 đến n, với n được nhập từ bàn phím. s = 2^2 + 4^2 + 6^2 +...+ N^2
ví dụ:
nhap n=5
tong la= 20
viết chương trình tính tổng
s= 1*2/3*4+2*3/4*5+3*4/5*6+...+n*(n+1)/(n+2)*(n+3)
Các lệnh khai báo biến sau đây là đúng hay sai ? Nếu sai hãy chữa lại cho đúng
1 . for i:= 10 to 1 do writeln('a');.......................................................................
2 . s: =0; n: = 1:while <= 10 do n := n+1; s : = s + n;.........................................................................
3 . a: array[1..100] of real ;......................................................................................................
4 . a: = 1 ; while a < 2 do writeln ('a');.............................................................
mấy bạn giúp mik vs nke ...!!
Viết câu lệnh để tính các tổng sau:
a. S1 = 1 + 2 + 3 + ... + n
b. S2 = 1 + 2 + 3 + ... + 12
c. S3 = 2 + 4 + 6 + ... + n
d. S4 = 2 + 4 + 6 + ... + 32
e. S5 = 1 + 3 + 5 + ... + n
f. S6 = 1 + 3 + 5 + ... + 39
Các bạn giải được câu nào thì giải giúp mình. Cảm ơn rất nhiều!!
GIÚP EM MN ƠI, MAI EM NỘP R Ạ T-T.
Xoá sạch màn hình kết quả, sử dụng vòng lặp While . do hoặc For..do viết chương trình tính tổng sau: S=1/1*2+1/2*3+1/3*4+.....+1/n*(n+1)
N nhập từ bàn phím
Viết chương trình tính tổng sau S=1-2+3-4.....-n