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.

5 tháng 4 2019

program hotrotinhoc ;

var n,P : integer ;

begin

P:=1;

while P<=2000 do

begin

n:=n+1;

P:=P*i ;

end;

write('P=',P);

readln

end.

program hotrotinhoc ;

var n,P : integer ;

begin

P:=1;

while P<=2000 do

begin

n:=n+1;

P:=P*i ;

end;

write('P=',P);

readln

end.

8 tháng 11 2017

program tong_so_tu_nhien;

uses crt;

var a,i,s: longint;

begin

clrscr;

s:= 0;

while s<=2000 do begin

writeln('nhap so n: '); readln(n);

s:= s+n;

writeln('tong la: ',s); end;

readln

end.

Mình chạy chương trình rồi! Làm đúng đó nên bạn tham khảo nhé! Chúc bạn học tốt! hihi

7 tháng 5 2017

giúp mình vs

Câu 6:

uses crt;

var n,i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

if n mod i=0 then write(i:4);

readln;

end.

5:

uses crt;

var n,i,dem:integer;

begin

clrscr;

readln(n);

dem:=0;

for i:=0 to n do

if i mod 2=1 then 

begin

write(i:4);

dem:=dem+1;

end;

writeln;

writeln(dem);

readln;

end.

Thì tính kiểu gì ạ🥶🥶🥶

Tính ntn???????😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳😳

23 tháng 4 2019

Lời giải:

Bài 1 :

program hotrotinhoc ;

var i,x : integer ;

begin

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

if x mod 2=0 then writeln('Day la so chan') else writeln('Day la so le');

while x<>0 do

begin

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

if x mod 2=0 then writeln('Day la so chan') else writeln('Day la so le');

end;

readln

end.

23 tháng 4 2019

Bài 2 bạn kiểm tra lại đề nhé N ở đâu bạn ???

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

double p1,p2;

int i,n;

int main()

{

cin>>n;

p1=1;

p2=1;

for (i=1; i<=n; i++)

{

if (i%2==0) p2=p2*(i*1.0);

else p1=p1*(i*1.0);

}

cout<<fixed<<setprecision(2)<<p1<<endl;

cout<<fixed<<setprecision(2)<<p2;

return 0;

}

14 tháng 2 2023

Var P, N, i: Integer;

Begin

       Write('Nhap N: ');

       ReadLn(N);

       P := 1;

       For i := 1 To N Do

              P := P * (1/i);

       Writeln('Tich cua P la: ', P);

End.

   

 

 

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;

}