Viết chương trình tính N! Sao cho N! Nhỏ hơn hoặc bằng 5000.
Em cần gấp ạ
viết chương trình tính tổng các số chẵn nhỏ hơn hoặc bằng n với n là số nguyênđược nhập từ bàn phím .chỉ em đi em cần gấp :<
Giúp em gấp mn ơi Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n ( với n được nhập từ bán phím) sao cho 15 số được in trên một dòng
uses crt;
var i,n,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
dem:=0;
for i:=1 to n do
if i mod 2=0 then
begin
inc(dem);
write(i:4);
if dem=15 then writeln;
end;
readln;
end.
chào tất cả anh chỉ rút em gải bài nài với ạ: viết chương trình đến các số chia hết cho 2 hoặc chia hết cho 5 trong dãy a gồm n số nguyên dương (n nhỏ hơn hoặc bằng 100)
#include <bits/stdc++.h>
using namespace std;
long long x,i,n,dem;
int main()
{
cin>>n;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if ((x%2==0) or (x%5==0)) dem++;
}
cout<<dem;
return 0;
}
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.
viết chương trình tính tổng n các số lẻ nhỏ hơn hoặc bằng n bằng
-for do
-while do
for ... do
program Tinh_S;
uses crt;
var i,n:byte;
S:longint;
begin
writeln('Nhap so n='); readln(n);
S:=0;
for i:=1 to n do
if i mod 2=1 then S:=S+i;
writeln('Tong cac so le nho hon hoac bang n la, S=',S)
readln
end.
* While....do
Uses crt;
var n,i,k: integer;
begin clrscr;
readln(n);
i:=0;
while(i<=n) do begin
i:=i+1;
if(i mod 2<>0) then k:=k+i;
end;
writeln(k);
readln;
end.
* for...do
Uses crt;
var n,i,u: integer;
begin clrscr;
readln(n);
for i:=1 to n do if(i mod 2<>0) then u:=u+i;
writeln(u);
readln;
end.
while... do
program Tinh_P;
uses crt;
var i,n:byte;
P:longint;
begin
writeln('Nhap so n='); readln(n);
P:=0; i:=1;
while i<=n do
begin
if i mod 2=1 then P:=P+i;
i:=i+1;
end;
writeln('Tong so le nho hon hoac bang n la, P=',P);
readln
end.
viết chương trình tính tổng các số chẵn từ nhỏ hơn hoặc bằng n
Program HOC24;
var i,n: integer;
t: longint;
begin
write('Nhap n: '); readln(n);
t:=0;
for i:=1 to n do if i mod 2=0 then t:=t+i;
write('Ket qua: ',t);
readln
end.
Tính tổng S biết S(n) = 1^2 + 2^2 +3^2 +4^2+… + k^2 sao cho tất cả các giá trị từ 1^2 đến k^2 phải nhỏ hơn hoặc bằng n
1. viết chương trình cho người dùng nhập n . In ra tổng của S
2.trình bày ra giấy tính độ phức tạp của chương trình vừa thực hiện
Mn làm giúp mình với ạ . Càng sớm càng tốt :((
1:
#include <bits/stdc++.h>
using namespace std;
long long n,i,s;
int main()
{
cin>>n;
s=0;
for (i=1; i<=n; i++)
s=s+i*i;
cout<<s;
return 0;
}
Cho em hỏi đề bài viết chương tính tổng các số tự nhiên nhỏ hơn hoặc bằng N
Sao cho tổng đó bé hơn hoặc bằng 0
Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n ( HD: cho biến i chạy từ 1 đến n. Nếu i chẵn ( i chia 2 dư 0) thì in ra số n.) giúp e vs ạ
uses crt;
var i,n:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if i mod 2=1 then write(i:4);
readln;
end.