Xây dựng hàm tìm giá trị lớn nhất của hai số nguyên a và b viết chương trình nhập vào 4 số nguyên từ bàn phím sử dụng hàm max (a,b) để tìm và in ra màn hình giá trị lớn nhất của 4 số nguyên đó ...giup mình nhanh với ạ mk cho 5 sao lun và ngay
2 câu trả lời
uses crt;
var a,b,c,d:longint;
function max(a,b:longint):longint;
begin
if a>b then exit(a)
else exit(b);
end;
begin
clrscr;
readln(a,b,c,d);
writeln(max(max(a,b),max(c,d)));
readln;
end.
uses crt;
var a,b,c,d:longint;
function max(a,b:longint):longint;
begin
if a>b then exit(a) else exit(b);
end;
begin
clrscr;
read(a,b,c,d);
write(max(max(a,b),max(c,d)));
readln;readln;
end.
