mình đang cần gấp: Nhập n từ bàn phím tìm các số chính phương nhỏ hơn n ví dụ: nhập n là 10 tìm các số chính phương nhỏ hơn 10 và lớn hơn 0

mình đang cần gấp:
Nhập n từ bàn phím tìm các số chính phương nhỏ hơn n
ví dụ: nhập n là 10 tìm các số chính phương nhỏ hơn 10 và lớn hơn 0

0 bình luận về “mình đang cần gấp: Nhập n từ bàn phím tìm các số chính phương nhỏ hơn n ví dụ: nhập n là 10 tìm các số chính phương nhỏ hơn 10 và lớn hơn 0”

  1. program Taylor;
    uses crt;
    var n,i:longint;
    begin
    clrscr;
       write(‘n=’);readln(n);
       writeln(‘Cac so chinh phuong tu 0 den ‘,n,’: ‘);
       for i:=1 to n-1 do
          if sqrt(i)=trunc(sqrt(i)) then writeln(i);
    readln
    end.

    Bình luận

Viết một bình luận