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.

16 tháng 3 2017

var a,b,c,n:integer;

begin

readln(n,a,b,c);

if (a=b) or (b=c) or (a=c) then

writeln('can') else writeln('khong can');

end.

16 tháng 3 2017

sai kìa -_-, nếu nói như bạn, tam giác cứ 2 cạnh = nhau thì cân à -_-

22 tháng 7 2023

a = float(input('Nhập cạnh thứ nhất (A): '))

b = float(input('Nhập cạnh thứ hai (B): '))

c = float(input('Nhập cạnh thứ ba (C): '))

if a == b == c:

       print('Tam giác đều')

elif a == b or b == c or c == a:

       if a*a + b*b == c*c or a*a + c*c == b*b or b*b + c*c == a*a:

              print('Tam giác vuông cân')

       else:

              print('Tam giác cân')

elif a*a + b*b == c*c or a*a + c*c == b*b or b*b + c*c == a*a:

       print('Tam giác vuông')

else:

       print('Tam giác thường')

31 tháng 3 2023

Câu 1:

ho_ten = input("Nhập họ tên: ")

tach_ho_ten = ho_ten.split()

if len(tach_ho_ten) > 1:

     ten = tach_ho_ten[-1]

     print("Tên của bạn là:", ten)

else:

     print("Nhập sai định dạng họ tên")

Câu 2: 

s = input("Nhập xâu: ")

hoa = s.upper()

print(hoa)

3 tháng 5 2023

1)

Var array:[1..1000] of integer;

i,n,t:integer;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

For i:=1 to n do

If a[i] > a[i+1] then

Begin

t:=a[i];

a[i]:=a[i+1];

a[i+1]:=t;

End;

Write('Sap xep tang dan ');

For i:=1 to n do write(a[i]:8);

Readln

End.

3 tháng 5 2023

2)

Var array:[1..1000] of integer;

i,n,t:integer;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

For i:=1 to n do

If a[i] < a[i+1] then

Begin

t:=a[i];

a[i]:=a[i+1];

a[i+1]:=t;

End;

Write('Sap xep giam dan ');

For i:=1 to n do write(a[i]:8);

Readln

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;

}

Câu 1: 

uses crt;

var a:array[1..5]of integer;

max,i:integer;

begin

clrscr;

for i:=1 to 5 do 

  begin

write('A[',i,']='); readln(a[i]);

end;

max:=a[1];

for i:=1 to 5 do 

  if max<a[i] then max:=a[i];

writeln(max);

readln;

end.

Câu 2: 

uses crt;

var a:array[1..6]of integer;

min,i:integer;

begin

clrscr;

for i:=1 to 6 do 

  begin

write('A[',i,']='); readln(a[i]);

end;

min:=a[1];

for i:=1 to 6 do 

  if min>a[i] then min:=a[i];

writeln(min);

readln;

end.

10 tháng 12 2021

2:

#include <bits/stdc++.h>

using namespace std;

long long n,i;

int main()

{

cin>>n;

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

if (n%i==0) cout<<i<<" ";

return 0;

}

Bài 1:

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

if ((x<0) and (x%2!=0)) t=t+x;

}

cout<<t;

return 0;

}

27 tháng 4 2023

Var array:[1..1000] of integer;

i,n:integer;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

Write('Cac so vua nhap la ');

For i:=1 to n do write(a[i]:8);

Readln

End.