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.

12 tháng 11 2021

?

12 tháng 11 2021

? CÁI GÌ

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,A[100];

cin>>n;

for (int i=1; i<=n; i++)

cin>>A[i];

for (int i=1; i<=n; i++)

cout<<A[i]<<" ";

return 0;

}

24 tháng 12 2022

Cau 1:

Câu 2:

#include <bits/stdc++.h>

using namespace std;

long long n;

int main()

{

cin>>n;

if (n>0 && n%5==0) cout<<"Phai";

else cout<<"Khong phai";

}

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;

}

25 tháng 4 2021

Làm giúp bài này nhé

 

25 tháng 4 2021

21 tháng 3 2023

n = int(input("Nhập vào một số nguyên dương: "))

if n < 0:

     print(n, "là số âm")

elif n > 0:

     print(n, "là số dương")

else:

     print(n, "là số 0")

9 tháng 3 2023

Var i,n,s:integer;

Begin

While n<=0 do

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

For i:=1 to n do

If n mod i = 0 then s:=s+i;

Write('Tong cac uoc cua ',n,' la ',s);

Readln;

End.

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,i,t=0;

cin>>n;

for (int i=1; i<=n; i++)

if (n%i==0) t+=i;

cout<<t;

return 0;

}

uses crt;

var a:array[1..100]of integer;

i,n:integer;

s:real;

begin

clrscr;

repeat

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

until n>0;

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

s:=1;

for i:=1 to n do 

  s:=s*a[i];

writeln(s:0:0);

readln;

end.

5 tháng 3 2021

EM không cần code ạ. Anh ghi từng bước được không ạ?

7 tháng 5 2023

program Le_Nho_Hon_Hoac_Bang_n;

uses crt;

var

       n, i: integer;

begin

       clrscr;

       write('Nhap vao mot so nguyen duong n: ');

       readln(n);

       while n <= 0 do

       begin

              writeln('So ban nhap khong hop le. Xin vui long nhap lai: ');

              readln(n);

       end;

       clrscr;

       writeln('Cac so le nho hon hoac bang ', n, ' la:');

       i := 1;

       while i <= n do

       begin

              if i mod 2 <> 0 then

                     writeln(i);

              i := i + 1;

       end;

       readln;

end.

Bạn ơi, đề bài yêu cầu gì vậy?

P/s: Bạn có thể ghi yêu cầu đề bài dưới phần bình luận được không?