viết chương trình xuất ra màn hình số lớn nhất trong ba số nguyên ngẫu nhiên được nhập từ bàn phím

0 bình luận về “viết chương trình xuất ra màn hình số lớn nhất trong ba số nguyên ngẫu nhiên được nhập từ bàn phím”

1. Program so_lon_nhat;

   Uses crt;

   Var a,b,c,max: integer;

   Begin 

   Writeln (‘nhap a,b,c=’); 

   Readln (a,b,c);

   If a>b then max:= a else max:= b;

   If c>max then max:= c;

   Writeln (‘so lon nhat la:’, max);

   Readln

   End.

   Bình luận

2. uses crt;
   var x,y,z,max:longint;
   begin
          clrscr;
          write(‘Nhap x,y,z: ‘); readln(x,y,z);
          if x>y then max:=x
          else max:=y;
          if max<z then max:=z;
          write(‘Max: ‘,max);
          readln;
   end.

   Bình luận