Ai giải hộ mình hứa cho 5☆ Viết chương trình nhập 2 số a , b từ bàn phím và in ra giá trị lớn nhất và giá trị nhỏ nhất

0 bình luận về “Ai giải hộ mình hứa cho 5☆ Viết chương trình nhập 2 số a , b từ bàn phím và in ra giá trị lớn nhất và giá trị nhỏ nhất”

1. Uses crt;

   Var a, b: integer;

   Begin

        Clrscr;

        Write(‘Nhap so a = ‘); readln(a);

        Write(‘Nhap so b = ‘); readln(b);

        If a<b then writeln(‘Gia tri nho nhat la: ‘,a) else writeln(‘Gia tri nho nhat la: ‘,b);

        If a>b then writeln(‘Gia tri lon nhat la: ‘,a) else writeln(‘Gia tri lon nhat la: ‘,b);

   Readln

   End.

   Bình luận

2. Program Kt _so_lon_nhat_nho_nhat;
   Uses crt;
   Var a, b : integer;
   Begin 
   write (“Nhap so nguyen a = “); readln(a); 
   write (“Nhap so nguyen b = “); readln(b); 
   max:=a; 
   if max < b then max:=b; 
   writeln (“So lon nhat la :”,max); 
   min:=a; 
   if min>b then min:=b; 
   writeln (“So nho nhat la :”,min); 
   readln; 
   End. 

   Bình luận