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.
Bài 2:
#include <bits/stdc++.h>
using namespace std;
long long n,i;
//chuongtrinhcon
int demuoc(long long n)
{
int dem=0;
for (long long i=1; i<=n; i++)
if (n%i==0) dem++;
return (dem);
}
//chuongtrinhchinh
int main()
{
freopen("tamuoc.inp","r",stdin);
freopen("tamuoc.out","w",stdout);
cin>>n;
long long dem=0;
for (i=1; i<=n; i++)
if (demuoc(i)==3) dem++;
cout<<dem;
return 0;
}
1.
#include <bits/stdc++.h>
using namespace std;
int A,n,i;
int main()
{
cin>>n;
A=0;
For (i=0;i<=n;i++)
A=A+1/i;
cout<<A;
Return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long a,b;
char st;
int main()
{
cin>>a>>b;
cout<<"Nhap phep tinh:"; cin>>st;
if (st=='+') cout<<a+b;
if (st=='-') cout<<a-b;
if (st=='*') cout<<a*b;
if (st=='/') cout<<a/b;
return 0;
}
uses crt;
var i,n,t,j,kt:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=2 to n do
if n mod i=0 then
begin
kt:=0;
for j:=2 to trunc(sqrt(i)) do
if i mod j=0 then kt:=1;
if kt=0 then t:=t+i;
end;
write(t);
readln;
end.
Uses crt;
var i,n:longint;
S,A:real;
begin
clrscr;
Readln(A);
S:=0;n:=0;
while S<=A do
Begin
S:=0;
inc(n);
for i:= 1 to n do S:=S+1/i;
end;
Writeln(n);
readln;
end.
C++:
#include <iostream>
Using namespace std;
Int main(){
Cin>>n;
Cout<<endl;
Cout<<3*n<<endl;
Return 0;
}
Viết chương trình Pascal à bạn?