Question

Bạn nào biết làm hộ mik được ko ạ! Mik cảm ơn! Bạn nào làm hộ mik, mik tick hết chứ ko phải mỗi bn đầu! Bạn nào biết bài nào thì làm hộ mik bài đó nha!

Answer 1

1: 

uses crt;

var a,b,c,max,min:longint;

begin

clrscr;

readln(a,b,c);

max=a;

if max<b then max:=b;

if max<c then max:=c;

min:=a;

if min>c then min:=c;

if min>b then min:=b;

writeln(max,' ',min);

readln;

end.