K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

D
datcoder
Giáo viên
4 tháng 10 2023

Bài 1:

Program HOC24;

uses crt;

var n: integer;

begin

clrscr;

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

if n mod 2 = 0 then write(n,' la so chan') else write(n,' la so le');

readln;

end.

Bài 2:

Program HOC24;

uses crt;

var n: integer;

begin

clrscr;

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

if n = sqr(trunc(sqrt(n))) then write(n,' la so chinh phuong') else (n,' khong phai la so chinh phuong');

readln;

end.

29 tháng 9 2023
void solve(int n) {    if(n%2 == 0) {        cout << "CHAN'\n";    } else cout << "LE\n";    // kiem tra chinh phuong    int i = 2;    while(i*i <= n) {        if(i*i == n)  {            cout << "LA SO CHINH PHUONG\n";            return;        }    }    cout << "KHONG PHAI LA SO CHINH PHUONG'\n"; }
24 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long n,x;

int main()

{

cin>>n;

x=sqrt(n);

if (x*x==n) cout<<n<<" la so chinh phuong";

else cout<<n<<" khong la so chinh phuong";

return 0;

}

11 tháng 1 2023

const
fi='sochinhphuong.inp';
fo='sochinhphuong.out';
var f,g:text;n:longint;
function scp(n:longint):boolean;
begin
        if (sqr(trunc(sqrt(n)))=n) then exit (true);
        exit (false);
end;
begin
        assign(f,fi);reset(f);
        assign(g,fo);rewrite(g);
        readln(f,n);
        if scp(n) then writeln(g,'yes') else
        writeln(g,'no');
        close(f);close(g);
end.

18 tháng 12 2020

Thuật toán: 

-Bước 1: Nhập n

-Bước 2: Nếu \(\sqrt{n}=trunc\left(\sqrt{n}\right)\) thì n là số chính phương

không thì n không phải là số chính phương

-Bước 3: Kết thúc.

Viết chương trình

uses crt;

var n:integer;

begin

clrscr;

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

if n<0 then writeln(n,' khong la so chinh phuong')

else begin

             if sqrt(n)=trunc(sqrt(n)) then writeln(n,' la so chinh phuong')

             else writeln(n,' khong la so chinh phuong');

       end;

readln;

end.

18 tháng 12 2020

trunc là gì anh ? Với ghi Input Output hộ e với

uses crt;

var n:integer;

begin

clrscr;

repeat

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

until n>0;

if sqrt(n)=trunc(sqrt(n)) then writeln(n,' la so chinh phuong')

else writeln(n,' khong la so chinh phuong');

readln;

end.

function ktra(n:integer):boolean;

var kt:boolean;

begin

if trunc(sqrt(n))=sqrt(n) then kt:=true

else kt:=false;

if kt=true then ktra:=true

else ktra:=false;

end;

Bài 1:

#include <bits/stdc++.h>

using namespace std;

long long n,i;

bool kt;

int main()

{

cin>>n;

if (n>1) 

{

kt=true;

for (i=2; i*i<=n; i++) 

if (n%i==0) kt=false;

if (kt==true) cout<<n<<" la so nguyen to";

else cout<<n<<" khong la so nguyen to";

}

else cout<<n<<" khong la so nguyen to";

return 0;

}

 

10 tháng 5 2023

Câu 58:

Var n:integer;

Begin

Write('n = ');readln(n);

If n mod 2 <> 0 then write(n,' la so le')

Else write(n,' khong la so le');

Readln

End.

10 tháng 5 2023

Câu 61:

Var n:integer;

Begin

Write('n = ');readln(n);

If n mod 2 = 0 then write(n,' la so chan')

Else write(n,' khong la so chan');

Readln

End.

31 tháng 10 2021

python.

N = input(nhap so nguyen N)

if n%2 == 0:

      print('N la so chan')

else:

      print('N la so le')

27 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n%2!=0) cout<<"La so le";

else cout<<"Khong la so le";

return 0;

}