viết chương trình tính tổng bình phương của n số nguyên đầu tiên, với n được nhập từ bàn phím. In kết quả ra màn hình

2 câu trả lời

program bt;
uses crt;
var n,S,i:integer;
begin
clrscr;
writeln('hay nhap n: ');readln(n);
S:=0;
for i:=1 to n do
S:=S+(i*i);
writeln('tong binh phuong cua day so la: ',S);
readln;
end.

code pascal:

program baitap;

uses crt;

var i,n,t:longint;

begin

write('nhap n=');

read(n);

t:=0;

for i:=1 to n do

t:=t+(i*i);

write('tong binh phuong n so nguyen dau tien la:',t);

readln;

readln;

end.

Câu hỏi trong lớp Xem thêm