Viết chương trình in ra số lớn nhất trong bốn số nhập từ bàn phím

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 399 03/08/2023


Viết chương trình in ra số lớn nhất trong bốn số nhập từ bàn phím

Đề bài: Viết chương trình in ra số lớn nhất trong bốn số nhập từ bàn phím với điều kiện chỉ được dùng hai biến.

Lời giải:

Program Lonnhat;

Uses crt;

Var a,max: integer;

Begin

Clrscr;

Write('Nhap so thu nhat:');

Readln(a);

max:=a;

Write('Nhap so thu 2:');

Readln(a);

If a>max then max:=a;

Write('Nhap so thu 3:');

Readln(a);

If a>max then max:=a;

Write('Nhap so thu 4:');

Readln(a);

If a>max then max:=a;

Writeln('So lon nhat la:',max);

Readln

End.

1 399 03/08/2023


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