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à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;

}

uses crt;

var a,b,c,tb:array[1..10]of real;

ln,nn:real;

i:integer;

begin

clrscr;

for i:=1 to 10 do readln(a[i],b[i],c[i]);

for i:=1 to 10 do 

  tb[i]:=(a[i]+b[i]+c[i])/3;

ln:=0;

nn:=10;

for i:=1 to 10 do 

  begin

if ln<tb[i] then ln:=tb[i];

if nn>tb[i] then nn:=tb[i];

end;

writeln(ln:4:2);

writeln(nn:4:2);

for i:=1 to 10 do 

 begin

if tb[i]>=5 then writeln('Ban thu ',i,' Dat')

else writeln('Ban thu ',i,'Chua dat');

end;

readln;

end.

marks = []

line = input("Hãy nhập các điểm kiểm tra cách nhau bởi dấu cách: ")

marks = [float(x) for x in line.split()]

total = 0

min_mark = marks[0]

max_mark = marks[0]

for m in marks:

    total += m

    if min_mark > m:

        min_mark = m

    if max_mark < m:

        max_mark = m

#a) Thông báo điểm đầu tiên và điểm cuối cùng trong danh sách.

print("Điểm trung bình: ", total / len(marks))

print("Điểm cao nhất: ", max_mark)

print("Điểm thấp nhất: ", min_mark)

print("Điểm đầu tiên: ", marks[0])

print("Điểm cuối cùng: ", marks[-1])

#b)Cho phép người dùng tra cứu đầu điểm thứ n với quy ước n bắt đầu từ 1 ứng với điểm đầu tiên, nếu n lớn hơn tổng số đầu điềm hoặc nhỏ hơn 1, cần thông báo không hợp lệ và yêu cầu người dùng nhập lại.

while True:

    try:

        n = int(input("Nhập n để tra cứu điểm đầu tiên thứ n (n bắt đầu từ 1): "))

        if n < 1 or n > len(marks):

            print("Số n không hợp lệ. Vui lòng nhập lại.")

            continue

        print("Điểm đầu tiên thứ", n, "là:", marks[n - 1])

        break

    except ValueError:

        print("Số n không hợp lệ. Vui lòng nhập lại.")

#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;

}

uses crt;

var a,b,c: integer;

begin

clrscr;

write('Nhap ngay; thang; nam :'); readln(a,b,c);

if (a>=1) and (a<=31) then write('Ngay hop le');

if (b>=1) and (b<=12) then write('Thang hop le');

if (c>=0) and (c<=2021) then write('Nam hop le');

readln

end.

uses crt;

var a,b,c: integer;

begin

clrscr;

write('Nhap ngay; thang; nam :'); readln(a,b,c);

if (a>=1) and (a<=31) then write('Ngay hop le');

if (b>=1) and (b<=12) then write('Thang hop le');

if (c>=0) and (c<=2021) then write('Nam hop le');

readln

end.

Trả lờiChuyển tiếp

uses crt;

var diem:real;

begin

clrscr;

repeat

write('Nhap diem trung binh:'); readln(diem);

until (0<=diem) and (diem<=10);

if diem<5 then writeln('Xep loai yeu')

else if (5<=diem) and (diem<6.5) then writeln('Xep loai trung binh')

else if (6.5<=diem) and (diem<8.0) then writeln('Xep loai kha')

else writeln('Xep loai gioi');

readln;

end.

help

#include<bits/stdc++.h>

using namespace std;

int a,b,c;

int main(){

cin>>a>>b>>c;

if((a+b)>c||(a+c)>b||(b+c)>a) cout<<"Yes";

else cout<<"No";

}