Viết chương trình nhập vào số nguyên n tính: S=1^2+2^2+3^2+......+N^2 cái này làm trong Pascal nha
2 câu trả lời
uses crt;
var n,i,s:longint;
begin
clrscr;
write('nhap n:');readln(n);
s:=0;
for i:=1 to n do s:=s+i*i;
write('s=',s);
readln
end.
Đáp án:
uses crt; n,i,s:longint;
begin
clrscr;
write('nhap n:');readln(n);
s:=0;
for i:=1 to n do s:=s+i*i;
write('s=',s);
readln
end.
Chúc bạn năm mới vui vẻ nha!