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.

13 tháng 6 2023

c++:

#include <iostream>

using namespace std;

int main(){

int y;

cin >> y;

int i = 1;

int luythua = 1;

while(i<=y){

luythua = luythua *i;

i = i+1;

}

cout << luythua;

}

uses crt;

var x,y:integer;

//chuongtrinhcon

function tong(a,b:integer):integer;

begin

tong:=a+b;

end;

//chuongtrinhchinh

begin

clrscr;

readln(x,y);

writeln(tong(x,y));

readln;

end.

uses crt;

var n,kt,i,n1,i1:integer;

begin

clrscr;

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

kt:=0;

for i:=2 to trunc(sqrt(n)) do

  if n mod i=0 then kt:=1;

if kt=0 then writeln(n,' khong the phan tich thanh thua so nguyen to');

if kt=1 then begin

                write(n,'=');

                n1:=n;

                i1:=2;

                repeat

                    while n1 mod i1<>0 do

                      i1:=i1+1;

                    write(i1);

                    n1:=n1 div i1;

                    if n1>1 then write('*');

                until n1=1;

             end;

readln;

end.

30 tháng 6 2021

var n,k:int64;
    i,d:longint;
begin
        readln(n);
        k:=trunc(Sqrt(n));
        i:=2;
        res:=1;
        while i<=k do
        begin
                d:=0;
                while n mod i=0 do
                begin
                        write(i);
                        n:=n div i;
                        if n>1 then write('*');
                        inc(d);
                end;
                k:=trunc(sqrt(N));
                i:=i+1;
        end;
        if n>1 then write(n);
        readln;
end.

17 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long n,x;

int main()

{

cin>>n>>x;

cout<<pow(n,x);

return 0;

}

uses crt;

var x,y:integer;

{-------------------chuong-trinh-con-tong----------------------------}

function tong(a,b:integer):integer;

begin

tong:=a+b;

end;

{-------------------chuong-trinh-con-hieu----------------------------}

funtion hieu(a,b:integer):integer;

begin

hieu:=a-b;

end;

{-------------------chuong-trinh-con-tich----------------------------}

function tich(a,b:integer):integer;

begin

tich:=a*b;

end;

{-------------------chuong-trinh-con-thuong----------------------------}

function thuong(a,b:integer):real;

begin

thuong:=a/b;

end;

{----------------------chuong-trinh-chinh-----------------------}

begin

clrscr;

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

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

writeln('Tong la: ',tong(x,y));

writeln('Hieu la: ',hieu(x,y));

writeln('Tich la: ',tich(x,y));

writeln('Thuong la: ',thuong(x,y):4:2);

readln;

end.

Làm bằng pascal thì những bài như thế này thì test lớn chạy không nổi đâu bạn

#include <bits/stdc++.h>

using namespace std;

long long n,a,b;

int main()

{

cin>>n;

a=1;

while (pow(a,3)<=n) 

{

a++;

}

if (pow(a,3)==n) cout<<"YES";

else cout<<"NO";

cout<<endl;

b=1;

while (pow(5,b)<=n) do b++;

if (pow(5,b)==n) cout<<"YES";

else cout<<"NO";

cout<<endl<<pow(n,n)%7;

return 0;

}

24 tháng 2 2022

mik chỉ làm mỗi câu là một bài thôi bạn