nhập vào 1 số n in ra các số từ n đến 0
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.
Những câu hỏi liên quan
20 tháng 3 2021
a)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=0 then
begin
for i:=0 to n do
if i mod 2=0 then write(i:4);
end
else writeln(n,' khong la so chan');
readln;
end.
20 tháng 3 2021
b)
uses crt;
var i,n:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n<100;
if n mod 2=1 then
begin
for i:=1 to n do
if i mod 2=1 then write(i:4);
end
else writeln(n,' khong la so le');
readln;
end.
8 tháng 3 2022
c1:
#include <bits/stdc++.h>
using namespace std;
long long i,n,s;
int main()
{
cin>>n;
s=1;
for (i=1; i<=n; i++) s=s*i;
cout<<s;
return 0;
}
Câu 2:
#include <bits/stdc++.h>
using namespace std;
long long i,n,s;
int main()
{
cin>>n;
s=1;
for (i=1; i<=n; i++) if (i%2==0) s=s*i;
cout<<s;
return 0;
}
18 tháng 2 2022
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do write(i:4);
readln;
end.
22 tháng 3 2023
n = int(input("Nhập vào số n: "))
if n <= 0:
print("n phải lớn hơn 0")
else:
for i in range(1, n+1):
print(i)
ML
19 tháng 3 2023
Câu 1:
Program HOC24;
var i,p: integer;
t: longint;
begin
write('Nhap P: '); readln(p);
t:=0;
for i:=1 to p do if i mod 2<>0 then t:=t+i;
write('Tong cac so le la: ',t);
readln
end.
3 tháng 8 2023
program SoUocLa3;
var
n, i, count: integer;
begin
write('Nhap gia tri cua n (10<=n<=10^9): ');
readln(n);
writeln('Cac so co so uoc la 3 tu 1 den ', n, ' la:');
count := 0;
for i := 1 to n do
begin
if (n mod i = 0) then
begin
count := count + 1;
end;
if (count = 3) then
begin
write(i, ' ');
count := 0;
end;
end;
readln;
end.
30 tháng 4 2022
c:
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++)
if (a[i]%2==0) cout<<a[i]<<" ";
return 0;
}
d:
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i,nn;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
nn=a[1];
for (i=1; i<=n; i++) nn=min(nn,a[i]);
cout<<nn;
return 0;
}
TK
Program hotrotinhoc_hoc24;
var i,n,d: integer;
begin
write('Nhap n='); readln(n);
d:=0;
for i:=1 to n do if i mod 2=0 then d:=d+1;
writeln('Co ',d,' so chan tu 1 den n');
write('Cac so chan do la : ');
for i:=1 to n do if i mod 2=0 then write(i,' ');
readln
end.
Làm sai đề rồi em ơi!