Viết chương trình nhập 4 số nguyên từ bàn phím, đưa ra giá trị lớn nhất của 4 số đó, trong đó có sử dụng hàm, tìm giá trị lớn nhất của 2 số nguyên Giải cho em vs ạ ktra

139168850623090

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 45 xem

1 trả lời

Thích Trả lời

Phuongdytto

uses crt;
var a,b,c,d,t,k:integer;
function Max(x,y:integer):boolean;
Begin
if x>y then Max:=true else Max:=false;
End;
BEGIN
clrscr;
write('Nhap so thu 1: ');readln(a);
write('Nhap so thu 2: ');readln(b);
write('Nhap so thu 3: ');readln(c);
write('Nhap so thu 4: ');readln(d);
if Max(a,b) then t:=a else t:=b;
if Max(c,d) then k:=c else k:=d;
if Max(t,k) then write('So lon nhat la: ',t) else write('So lon nhat la: ',k);
readln
END.

Cho mik xin hay nhất nhé mik chỉ thiếu ctlhn nữa thôi

Vote (0) Phản hồi (0) 2 năm trước

hao69bs

uses crt;
var a:array[1..4] of longint;
i:byte;m1,m2:longint;
function max(x,y:longint):longint;
begin
if x>y then exit(x);
exit(y);
end;
begin
clrscr;
for i:=1 to 4 do
begin
write('Nhap so thu ',i,' = ');readln(a[i]);
end;
m1:=max(a[1],a[2]);
m2:=max(a[3],a[4]);
writeln('So lon nhat la: ',max(m1,m2));
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Giải bất phương trình sau và biểu diễn tập nghiệm trên trục số: 2.(x-1) > 5.(x+2) - 3x

Nêu một số ngành công nghiệp gây ô nhiễm môi trường ở châu âu và cho biết gây ô nhiễm như thế nào

dựa vào kiến thức đã học và hiểu biết của bản thân em hãy phân tích tác động của con người đến bề mặt địa hình như thế nào?

Nêu các bước tạo nền bằng mẫu có sẵn cho trang chiếu

Bài 6: (3,5 điểm) Cho tam giác ABC vuông tại A (AB < AC), đường cao AH (He BC). Vẽ BD là đường phân giác của góc ABC (D eAC) cắt AH tại M. a) Chứng minh tam giác ABH đồng dạng với tam giác CBA, tam giác BAM và tam giác BCD đồng dạng b) C/m AB/AD= CB/CD và AB.AM= BC.HM c) Trường hợp có BC = 3AB, C/m: S.ABC = 36.S.BHM. Xin trợ giúp từ các men

Cho AABC nhọn. Các đường cao AD, BE cắt nhau ở H. a) Chứng minh AAEH đồng dạng với ABDH từ đó suy ra AH.HD = BH.HE b) Chứng minh góc BAD bằng góc BED. c) Biết cạnh BC có độ dài bằng a (không đổi), tìm giá trị lớn nhất của tích AD.HD theo a.

một nhóm học sinh đang chia đều một số quyển vở vào các phần quà để tặng cho các em nhỏ có hoàn cảnh khó khăn. Nhóm nhận thấy nếu giảm 6 quyển vở ở mỗi phần quà thì số phần quà cho các em sẽ tăng thêm 5 phần, nếu giảm 10 quyển vở ở mỗi phần quà thì số phần quà cho các em sẽ tăng thêm 10 phần. Hỏi nhón có tất cả bao nhiêu quyển vở ?

Nêu các bước tạo nền bằng mẫu có sẵn cho trang chiếu

Giải giúp em bài này với ạ. Đang cần gấp!!

Nêu nguyên tắc của ngành dịch vụ

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến