nhập 3 số từ màn hình in ra số có giá trị lớn nhất trong 3 số

0 bình luận về “nhập 3 số từ màn hình in ra số có giá trị lớn nhất trong 3 số”

1. Mình xài C+ á, Pascal hình như vẫn được đó 🙂

   Program Bt1;

   Uses crt;

   Var a,b,c:real;

   Begin

   Clrscr;

   Write (‘nhap a=’);

   Readln (a);

   Write (‘nhap b=’);

   Readln (b)

   Write (‘nhap c=’);

   Readln (c);

   If a>b Then

    If a>c Then

   Write (‘Ket qua:’,a,b,c :6 :2′) [Bạn nên nhớ là trước Else không có chấm phẩy]

   Else write (‘So lon nhat la’);

   Readln;

   End.

   Bình luận

2. Program BTT;
   Uses crt;
   Var a,b,c,max: longint;
   Begin
           Clrscr;
           Write(‘Nhap a, b, c: ‘); Readln(a,b,c);
           max:=a;
           If b>max then max:=b;

           If c>max then max:=c;

           Write(‘Max = ‘,max);

           Readln
   End.

   Bình luận