[Tin học 8] Viết chương trình

Sao Mai

Học sinh
Thành viên
29 Tháng tư 2017
28
9
31
20
[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Viết chương trình tính tổng dãy số sau với n được nhập từ bàn phím:
gif.latex
 

siroclc

Học sinh
Thành viên
3 Tháng mười một 2017
19
5
41
Lào Cai
THCS Đồng Tuyển
Program tongdayso;
Uses crt;
Var n, i:integer;
tong:real;
Begin
Clrscr;
tong:=0;
Writeln('Nhap so cac so can tinh:');
readln(n);
For i:=1 to n do tong:=tong+1/(i*(i+2));
Writeln('Tong day so can tim la:',tong:5:2);
Readln;
End.
 
Top Bottom