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.

27 tháng 2 2023

bằng c++ giupws em vói ạ

28 tháng 2 2023

Công thức : < giá trị cuối > - < giá trị đầu > + 1

Áp dụng : 7 - 2 + 1 = 6 ( lần lặp )

28 tháng 2 2023

program tim_so_nguyen;

uses crt;

var i,N:integer;

begin

clrscr;

write('nhap so nguyen:');

readln(N);

if N <= 2 then write(N,' khong phai la so nguyen to')

else 

begin

i:=2;

while ( N mod i <> 0 ) do i:=i+1;

if i=N then write(N,' la so nguyen to')

else write(N,' khong phai la so nguyen to');

end;

readln;

end.

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,i,kt;

cin>>n;

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

{

kt=0;

for (int j=2; j*j<=i; j++)

if (i%j==0) kt=1;

if (kt==0) cout<<i<<" ";

}

}

27 tháng 2 2023

uses crt;

var i,n:integer;

begin

clrscr;

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

writeln('cac so chan trong khoang tu 1 toi ',n,' la:');

for i:=1 to n do

if i mod 2=0 then write(i:4);

readln;

end.

27 tháng 2 2023

var A:

     array[1..n] of int64;

     i, n, count: integer;

begin

     write('Nhap so phan tu cua mang: ');

     readln(n);

     for i := 1 to n do

     begin

          write('Nhap phan tu thu ', i, ': ');

          readln(A[i]);

      end;

 

     count := 0;

     for i := 1 to n do

          if A[i] > 0 then

               count := count + 1;

     writeln('So luong cac so nguyen duong trong mang la: ', count); end.

27 tháng 2 2023

var A:

     array[1..n] of integer;

     i, j, n: integer;

begin

     write('Nhap so phan tu cua mang: ');

     readln(n);

     for i := 1 to n do

     begin

          write('Nhap phan tu thu ', i, ': ');

          readln(A[i]);

     end;

 

     for i := 1 to n - 1 do

         for j := i+1 to n do

            if (A[i] mod 2 = 0) and (A[j] mod 2 = 0) and (A[i] < A[j]) or (A[i] mod 2 = 1) and (A[j] mod 2 = 1) and (A[i] > A[j]) then

            begin

                swap(A[i], A[j]);

            end;

     writeln('Mang da sap xep la: ');

      for i := 1 to n do

         writeln(A[i]);

end.

 

uses crt;

const fi='baitap.txt';

var f1:text;

x,y:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

readln(f1,x,y);

writeln(sqrt(x*x+y*y):4:2);

close(f1);

readln;

end.

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,i,kt;

cin>>n;

cout<<pow((n*(n+1)/2),4);

}

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,i,dem=0;

cin>>n;

for (int i=n; i>=1; i--)

if (n%i==0)

{

cout<<i<<" ";

dem++;

if (dem==3) break;

}

cout<<endl;

cout<<n*1<<" "<<n*2<<" "<<n*3<<endl;

}