Viết chương trình tính tổng T = 1+ 1/ 2x2 + 1/ 3x3 + 1/ 4x4 + ......1/ 10x10
2 câu trả lời
program tong;
uses crt;
var i:integer;
T:real;
begin clrscr;
T:=0;
for i:=1 to 10 do
T:=T+1/i*i;
write('Tong T= ',T:4:2);
readln;
end.
Học tốt!
program tinhtong;
uses crt;
var i:integer;
t:real;
begin clrscr;
t:=0;
for i:=1 to 10 do
t:=t+1/i*i;
write('Tong T= ',t:4:2);
readln;
end.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
