Tham khảo!
(----------------------------------1-----------------------------------------------)
program ho_tro;
uses crt;
var a,b,c,max: real;
begin
clrscr;
writeln(' nhap 3 so:'); readln(a,b,c);
max:=a;
max:=b;
max:=c;
if max<a then max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln(' so lon nhat trong 3 so la:',max);
readln;
end.
(-------------------------------------------------2----------------------------)
program ho_tro;
uses crt;
var a,b,c: integer;
begin
clrscr;
writeln(' nhap 3 so :'); readln(a,b,c);
if (a+b)>c or (a+c)>b or (b+c)>a then writeln(' la 3 canh cua tam giac:')
else writeln(' k phai 3 canh cua tam giac:');
readln;
end.
