Câu 1 : Viết chương trình tính tổng S = 1+ 2³ +3³ +4³+...+100³ Giải giúp mik vs,tin học 11
2 câu trả lời
uses crt;
var d:qword; i:longint;
begin
clrscr;
d:=0;
for i:=1 to 100 do d:=d+i*i*i;
writeln('Tong lap phuong cac so tu 1 den 100 la: ',d);
readln;
end.
uses crt;
var s, i: integer;
begin
clrscr;
s:=0;
for i:=1 to 100 do
s:=s+(i*i*i);
writeln ('tong la: ',s);
readln;
end.
cam kết đúng 100% vì đã chạy thử chương trình
Câu hỏi trong lớp
Xem thêm
