Question

viết chương trình nhập vào chiều cao 3 bạn kiểm tra và sắp thông báo bạn nào cao nhất trong 3 bạn đó, nếu 3 bạn đó cao bằng nhau thì thông báo 3 bạn bằng nhau, ngược lại thông báo không có người cao nhất

=-= giúp mình làm nhanh với vì mai kiểm tra rồi

Answer 1

var a,b,c,h:integer;

begin

write('a=');readln(a);

write('b=');readln(b);

write('c=');readln(c);

h:=a;

if b>h then h:=b;

if c>h then h:=c;

if (a=c) and (a=b) then writeln(' Chieu cao 3 ban bang nhau va khong co nguoi cao nhat ')

else writeln(' Ban cao nhat la : ',h);

readln;

end.