Điểm:
100
Thời gian:
1.0s
Bộ nhớ:
256M
Input:
bàn phím
Output:
màn hình
Cho 4 số nguyên \(a, b, c, d\). Tìm và đưa ra phần tử lớn nhất trong 4 số đó.
Yêu cầu: Sử dụng hàm có sẵn trong thư viện.
Input
- Gồm 4 dòng, mỗi dòng ghi một số nguyên có giá trị trong \([-1000, 1000].\)
Output
- In ra một số nguyên là kết quả.
Example
Test 1
Input
34
12
2
6
Output
34
Bình luận
VAr a,b,c,d:int64;
function max(m,n,v,f:int64):int64;
begin
If (m>n) and (m>v) and (m>f) then max:=m else If (n>m) and (n>v) and (n>f) then max:=n else If (v>n) and (v>m) and (v>f) then max:=v else If (f>n) and (f>m) and (f>v) then max:=f else If (m=n) or (n=v) or (v=f) then max:=f;
end;
begin
readln(a,b,c,d);
Writeln(max(a,b,c,d));
readln
end.(ko chơi kiểu if mat day đâu nha pascal để hàm max phải làm thế)
6 bình luận nữa