viết phương trình -Nhập vào số nguyên N -Tính tổng bình phương N số nguyên đầu tiên và xuất kết quả ra nàm hình

2 câu trả lời

program oken;

uses crt;

var i,n,tong:integer;

begin

clrscr;

write('Nhap so nguyen n: '); readln(n);

tong:=0;

for i:= 1 to n do tong:= tong+sqr(i);

writeln('Tong binh phuong ',n,' so nguyen dau tien la: ',tong);

readln;

end.

cho mình câu trả lời hay nhất nha

uses crt;

var i,n,tong:longint;

begin

clrscr;

write('Nhap N: ');readln(n);

tong:=0;

for i:= 1 to n do tong:= tong + i*i;

writeln('Tong binh phuong ',n,' so nguyen dau tien la: ',tong);

readln;

end.