trần hoàng

Viết chương trình nhập vào một số nguyên dương n . rồi xuất ra
màn hình tổng các số chính phương nhỏ hơn hoặc bằng n.

mn giúp em vs ạ

Nguyễn Lê Phước Thịnh
4 tháng 4 2022 lúc 21:52

uses crt;

var i,n,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do 

  if sqrt(i)=trunc(sqrt(i)) then t:=t+i;

writeln(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
trần hoàng
Xem chi tiết
trần hoàng
Xem chi tiết
Nguyễn Trường An
Xem chi tiết
Phan Hoàng Xuân Huy
Xem chi tiết
lêhữudanh123
Xem chi tiết
Cao Ngọc Bảo Quyên
Xem chi tiết
Nhat thanh Tran
Xem chi tiết
kadydaucac
Xem chi tiết
tâm 8a3
Xem chi tiết