cho 2 số thực a,b. Hãy viết chương trình so sánh 2 số đó kết quả là `a lon hon b’,`a nho hon b’ hoặc`a bang b’ theo 2 cách.

0 bình luận về “cho 2 số thực a,b. Hãy viết chương trình so sánh 2 số đó kết quả là `a lon hon b’,`a nho hon b’ hoặc`a bang b’ theo 2 cách.”

1. c1:

   program ctct;

   uses crt;

       var a, b: real;

   begin

              clrscr;

              write(‘Nhap a = ‘); readln(a);

              write(‘Nhap b = ‘); readln(b);

              if a>b then write(a, ‘ lon hon ‘, b);

              if a<b then write(a, ‘ nho hon ‘, b);

              if a=b then write(a, ‘ bang ‘, b);

              readln

   end.

   c2:

   program ctct;

   uses crt;

       var a, b: real;

   begin

              clrscr;

              write(‘Nhap a = ‘); readln(a);

              write(‘Nhap b = ‘); readln(b);

              if a>b then write(a, ‘ lon hon ‘, b) else

                        if a<b then write(a, ‘ nho hon ‘, b) else

                                    write(a, ‘ bang ‘, b);

              readln

   end.

   Bình luận

2. c1 . Dùng câu lệnh điều kiện thiếu

   program az;

   uses Crt;

   var a,b : real;

   begin

   clrscr;

   Write(‘Nhap 2 so a va b’); readln(a,b);

   If (a > b) then Write(‘a lon hon b’);

   If (a < b) then Write(‘a nho hon b’);

   If (a = b) then Write(‘a bang b’);

   readln

   end.

   c2 : Dung cau lenh dieu kien du

   program az;

   uses Crt;

   var a,b : real;

   begin

   clrscr;

   Write(‘Nhap 2 so a va b’); readln(a,b);

   If (a > b) then Wrtie(‘a lon hon b’) else If (a < b) then Write(‘a nho hon b’) else Write(‘a bang b’);

   readln

   end.

   Bình luận