Tìm số lớn nhất trong 3 số A ,B ,C

2 câu trả lời

Sử dụng hàm max để tìm giá trị lớn nhất

uses crt;

var a,b,c,max: integer;

begin

clrscr;

write ('nhap a: ');   readln (A);

write ('nhap b: ');   readln (B);

write ('nhap c: ');   readln (C);

if (a>b) and (a>c) then max:=a;

if (b>a) and (b>c) then max:=b;

if (c>a) and (c>b) then max:=c;

writeln ('so lon nhat la: ',max);

readln;

end.

Câu hỏi trong lớp Xem thêm