Viết chương trình nhập vào một số n , xuất ra những số chính phương nhỏ hơn hoặc bằng n.
Những câu hỏi liên quan
Viết chương trình nhập vào một số nguyên dương n . rồi xuất ra
màn hình tổng các số chính phương nhỏ hơn hoặc bằng n.
mn giúp em vs ạ
uses crt;
var i,n,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do
if sqrt(i)=trunc(sqrt(i)) then t:=t+i;
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập vào một số nguyên dương n từ bàn phím 912.10n
Rồi đếm và xuất ra màn hình các số nguyên tố nhỏ hơn hoặc bằng n được viết trên
một hàng với mỗi số cách nhau ít nhất là một khoảng trắng.
#include <bits/stdc++.h>
using namespace std;
long long i,n,kt,j;
int main()
{
cin>>n;
for (i=2; i<=n; i++)
{
kt=0;
for (j=2; j*j<=i; j++)
if (i%j==0) kt=1;
if (kt==0) cout<<i<<" ";
}
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình nhập vào từ bàn phím một số nguyên dương n, in ra màn hình các số lẻ nhỏ hơn hoặc bằng số nguyên dương n. Chương trình yêu cầu nhập lại nếu n <=0. (Sử dụng câu lệnh While … do)
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.
Đúng 2
Bình luận (0)
Viết chương trình nhập vào một số n, xuất ra những số nguyên tố nhỏ hơn hoặc bằng n. Và tổng của tất cả những số nguyên tố đó.
uses crt;
var n,i,kt,j,t:integer;
begin
clrscr;
write('n='); readln(n);
t:=0;
writeln('cac so nguyen to nho hon hoac bang ',n,' la: ');
for i:=2 to n do
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then begin
write(i:4);
t:=t+i;
end;
end;
writeln;
writeln('tong cac so nguyen to nho hon hoac bang ',n,' la: ',t);
readln;
end.
Viết chương trình nhập vào một dãy số n nhỏ hơn hoặc bằng 255 nhập vào một số nguyên k cho biết có k trong dãy số vừa nhập 20 ngược lại đưa ra câu thông báo không có k trong dãy số
Xem chi tiết
uses crt;
var a:array[1..255]of integer;
i,n,k,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
kt:=0;
for i:=1 to n do
if a[i]=k then kt:=1;
if kt=0 then writeln(k,' khong co trong day')
else writeln(k,' co trong day');
readln;
end.
Đúng 1
Bình luận (0)
\(\dfrac{s}{13}=\dfrac{2s}{3-vn}+\dfrac{2s}{3+vn}\)
\(\dfrac{s}{13}=\dfrac{2s\left(3+vn\right)+2s\left(3-vn\right)}{9-vn^2}\)
\(\dfrac{s}{13}=\dfrac{12s}{9-vn^2}\)
\(s\left(9-vn^2\right)=12s\cdot13\)
\(s\left(9-vn^2\right)=156s\)
\(9-vn^2=156\)
\(vn^2=-147\)
Đúng 1
Bình luận (0)
Viết chương trình nhập vào 1 số nguyên N in ra màn hình các số hoàn chỉnh nhỏ hơn hoặc bằng N.
Helpppppp meeeeeeee!!!!
{program bt_1;
uses crt;
Var:S ,n, i, j:longint;
Begin
clrsr;
Write('Nhap n');Readln(n);
For i:=1 to n do
Begin
S:=0;
For j:=0 to i do
if i mod j:=0 then S:=S+j;
if S=2*i then Write (i:5);
end;
readln;
end.
}
Đúng 0
Bình luận (0)
Viết chương trình nhập vào 1 số nguyên n
không âm, in ra màn hình số lượng số dương lớn hơn n và nhỏ hơn hoặc bằng n^2
ngôn ngữ c++
help me plssssssssssssssssssssssssssssssssssssssssss
#include <iostream>
using namespace std;
int main() {
int n;
cout << "Nhap vao mot so nguyen khong am: ";
cin >> n;
int count = 0;
for (int i = n + 1; i <= n * n; i++) {
if (i > 0) {
count++;
}
}
cout << "So luong so duong lon hon " << n << " va nho hon hoac bang " << n * n << " la: " << count << endl;
return 0;
}
Đúng 1
Bình luận (0)
#include <iostream>
using namespace std;
int main()
{
long long n;
cin>>n;
cout <<n*n-n<<endl;
return 0;
}
Đúng 1
Bình luận (0)
giúp mình vài câu với nha mọi người cảm ơn nhiều
câu 3:viết chương trình nhập vào số tự nhiên N và xuất ra màn hình các ước số tự nhiên của N
câu 4:viết chương trình nhập vào số tự nhiên N và xuất ra màn hình các số lẻ tự nhiên nhỏ hơn N
Câu 3:
Var i,n:integer:
Begin
Write('n = ');readln(n);
Write('Cac uoc cua n la ');
For i:=1 to n do
If n mod i = 0 then write(i:8);
Readln
End.
Đúng 2
Bình luận (0)
Câu 4
Var i,n:integer:
Begin
Write('n = ');readln(n);
Write('Cac so le nho hon n la ');
For i:=1 to n - 1 do
If i mod 2 <> 0 then write(i:8);
Readln
End.
Đúng 2
Bình luận (1)
Viết chương trình cho phép nhập từ bàn phím một số nguyên dương n và thực hiện:
a. In ra các số nguyên tố bé hơn hoặc bằng n.
b. In ra số nguyên tố nhỏ nhất không bé hơn n. c
. In ra các cặp số nguyên tố là hai số nguyên lẻ liên tiếp nhỏ hơn hoặc bằng n.
uses crt;
var n,i,o,d:integer;
function ktnt(n:integer): integer;
var i,d:integer;
begin
d:=0;
for i:=1 to sqrt(n) do
if (n mod i=0) then d:=d+1;
if d=2 then ktnt=0
else ktnt=1;
end;
begin
readln(n);
writeln(' so nguyen to be hon hoac bang n la'); {a}
for i:=1 to n do
if ktnt(i)=0 then writeln(i);
writeln('so nguyen to nho nhat khong be hon n');
o:=n;
while o>0 do
begin
if ktnt(o)=0 then
begin
write(o);
break;
end;
o:=o+1;
end;
writeln('cặp số nguyên tố là hai số nguyên lẻ liên tiếp nhỏ hơn hoặc bằng n');
o:=0;
o:=1;
d:=0;
for i:=o+2 to n do
begin
if ktnt(i)=0 then
begin
d:=d+1;
write(i,' ');
if d<2 then continue;
end;
d:=0;
writeln;
end;
readln;
end.
Đúng 0
Bình luận (1)