Tin học giải bài tập TIN CÂU LỆNH LẶP S=1^2+2^2+3^2+=n^2 24/07/2021 By Delilah giải bài tập TIN CÂU LỆNH LẶP S=1^2+2^2+3^2+…………n^2
program tinhtong; uses crt; var i,n:longint; s:int64; begin clrscr; write(‘Nhap n: ‘); readln(n); s:=0; for i:=1 to n do s:=s*sqr(i); write(‘tong la: ‘,t); readln end. Trả lời
var n,i,s:integer
begin
readln(n);
for i:=1 to n do s:=s+i*i;
writeln(n);
readln;
end.
program tinhtong;
uses crt;
var i,n:longint;
s:int64;
begin
clrscr;
write(‘Nhap n: ‘); readln(n);
s:=0;
for i:=1 to n do
s:=s*sqr(i);
write(‘tong la: ‘,t);
readln
end.