Cho 3 số a b c viết chương trình tìm giá trị lớn nhất và nhỏ nhất của 3 số đó

Vietjack.me giới thiệu bộ câu hỏi ôn tập Tin học có đáp án được biên soạn bám sát chương trình học giúp bạn ôn luyện và bổ sung kiến thức môn Tin học tốt hơn. Mời các bạn đón xem:

1 271 03/08/2023


Cho 3 số a b c viết chương trình tìm giá trị lớn nhất và nhỏ nhất của 3 số đó

Đề bài: Cho 3 số a b c viết chương trình tìm giá trị lớn nhất và nhỏ nhất của 3 số đó

Lời giải:

var a,b,c,i:integer;

          MX,MN:real;

begin

write(‘nhap a’);readln(a);

write(‘nhap b’);readln(b);

write(‘nhap c’);readln(c);

MX:=a;MN:=a;

if MX<b then MX:=b;

if MX<c then MX:=c;

if MN<b then MN:=b;

if MN<c then MN:=c;

writeln(‘Min=’,MN);

writeln(‘Max=’,MX);

readln;

end.

1 271 03/08/2023


Xem thêm các chương trình khác: