HT

Viết chương trình tính tổng bình phương của n số lẻ đầu tiên

 

NT
19 tháng 4 2021 lúc 18:34

uses crt;

var i,n,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

t:=0;

for i:=1 to 2*n do 

 if i mod 2=1 then t:=t+sqr(i);

writeln(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
LH
Xem chi tiết
UT
Xem chi tiết
H24
Xem chi tiết
MD
Xem chi tiết
LA
Xem chi tiết
LM
Xem chi tiết
NH
Xem chi tiết
BT
Xem chi tiết
LT
Xem chi tiết