Những câu hỏi liên quan
thixuanthuy le
Xem chi tiết
Nguyễn Lê Phước Thịnh
16 tháng 12 2022 lúc 14:37

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n;

cin>>n;

if (n>100 && n<1000) cout<<"La so hop le";

else cout<<"Khong la so hop le";

return 0;

}

Bình luận (0)
nguyễn thị diệu linh
Xem chi tiết
Rin Huỳnh
16 tháng 12 2021 lúc 6:14

Uses crt;

Var a, b, c:real;

Begin

Readln(a);

Readln(b);

Readln(c);

If (a + b > c) or (a + c > b) or (b + c > a) then writeln('tam giác')

Else writeln('Khong phai tam giac');

Readln

End.

Bình luận (0)
KenShi
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 12 2021 lúc 0:39

Bài 2: 

#include <bits/stdc++.h>

using namespace std;

long long x,y;

int main()

{

cin >>x>>y;

cout<<x<<" "<<y;

swap(x,y);

cout<<x<<" "<<y;

return 0;

}

Bình luận (0)
việt hoàng
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 1 2022 lúc 7:43

Bài 1: 

#include <bits/stdc++.h>

using namespace std;

long long a[10],n,i,t;

int main()

{

n=0;

do 

{

cin>>a[i];

}

while ((a[i]==0) or (n==10));

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

t=0;

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

if (a[i]%2!=0) t=t+a[i];

cout<<t;

return 0;

}

Bình luận (1)
Nguyễn Bảo Việt
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 10 2021 lúc 0:18

Bài 2: 

#include <bits/stdc++.h>;

using namespace std;

int main();

{

long m,n;

cout<<"Nhap m="; cin>>m;

cout<<"Nhap n="; cin>>n;

cout<<m*n-2;

return 0;

}

Bình luận (0)
An An Nguyễn
Xem chi tiết
Ngoc Thanh
Xem chi tiết
Nguyễn Lê Phước Thịnh
5 tháng 12 2021 lúc 13:53

#include <bits/stdc++.h>

using namespace std;

int a;

int main()

{

cin>>a;

if (a<=8) cout<<"Hop le";

else cout<<"Khong hop le";

return 0;

}

Bình luận (1)
Lê Tâm Anh
Xem chi tiết
gấu béo
7 tháng 5 2023 lúc 19:20

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.

Bình luận (0)
Bùi Lê Thanh Trúc
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 4 2022 lúc 8:21

uses crt;

var n,i,t,s:integer;

begin

clrscr;

repeat

readln(n);

until n<>0;

t:=0;

for i:=1 to n do if i mod 2=0 then t:=t+i;

writeln(t);

s:=1;

for i:=1 to n do 

  if i mod 2=1 then s:=s*i;

writeln(s);

readln;

end.

Bình luận (0)